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Adieu den Zeiten, in denen kostbare 
Zeit vor dem PC vertrödelt wurde, an¬ 
statt ihn das tun zu lassen, wofür er 
angeschafft wurde: Geld zu verdie¬ 
nen. Und adieu den Zeiten, in denen 
nach dem Kauf der Hardware der Soft- 
ware-Kosten-Schock kam. 


Jetzt gibt es IDA. Das komplette Ge¬ 
schäftssystem. Zum sagenhaften 
Preis von 949 — DM für den IBM PC/ 
XT/AT und alle Kompatiblen. Opti¬ 
mieren Sie mit EDA Ihren Betrieb. Das 
gibt Raum für neue Aktivitäten. 


IDA wird in drei über Software- 
Schnittstellen verbundenen Modulen 
geliefert: 


- IDA FAKTURA 498,- DM 

- IDA FIBU 498,- DM 

- IDA STATISTIK 198,- DM 

- IDA FAKTURA + FIBU 

+ STATISTIK 949,- DM 


Ebenso sagenhaft wie der Preis ist der 
Leistungsumfang von IDA (Spezielle 
Anpassungen auf Anfrage): 

FAKTURA: Stammdaten, Fehl-, Be¬ 
stell- und Preislisten, Lagerverwal¬ 
tung, Rechnungen, Lieferscheine, 
Auftragsbestätigung, Gut- und Last¬ 
schriften, Verkaufskalkulation, Wer¬ 
betexte, offene Posten, Mahntexte. 

FIBU: Steuervoranmeldung, Jahres¬ 
abschluß, G+V-Rechnung, drei va¬ 
riable Kontenrahmen, und umfang¬ 
reiche Hilfsfunktionen. Die FIBU ist 
von der Oberfinanzdirektion zuge¬ 
lassen. 

STATISTIK: Verkaufs-, Lager- und 
Umsatzstatistik, Rentabilitätsrech¬ 
nung, Bilanzauswertung, Grafik. 

IDA gibt es bei Innowave Data, Hanno¬ 
ver: Coupon einsenden oder einfach 
anrufen: (0511) 13030/39. 


□ Ja, ich möchte mit IDA arbeiten. 

□ IDA FAKTURA □ IDA FIBU □ IDA STATISTIK 
Ich habe folgenden Computer; 

Ich zahle □ per Scheck □ per Nachnahme □ Schicken Sie mir Unterlagen 



Innowave Data 


Kurt-Schumocher-Str. 26/28 • 3000 Hannover 1 


Name, Vorname 


Straße 


PLZ. Ort 


Telefon 



Fachhändleranfragen erwünscht. 


Schulungen auf Anfrage. 

















Editorial ~~i 



Liebe Leser! 

Die Anwendungsmöglichkeiten eines Computers sind derart vielfältig, daß man ohne großes 
Überlegen zahlreiche Beispiele aufzählen kann. Für diese Ausgabe haben wir uns sehr ausführ¬ 
lich mit dem Thema MIDI beschäftigt, eine jener Anwendungen, die sowohl aus technischer 
Sicht als auch aus dem Blickfeld der Software betrachtet werden muß und erst im optimalen 
Zusammenspiel zu voller Größe aufläuft. Unser Titelbericht verrät Ihnen alles Wissenswerte 
über MIDI , und für Hardware-Interessierte gibt es gleich eine komplette Bauanleitung samt 
Software zum Selbermachen. 

Für CPC-Anwender gibt es gleich zwei neue Serien zu vermelden, die jeweiligen Auftaktartikel 
zu den Themen »Mailbox« und »Spielprogrammierung in Assembler« finden Sie bereits in 
diesem Heft. 

Eine Eingabehilfe für Joyce-Programme wird das Abtippen von Listings in Zukunft erleichtern. 
Da dieses Programm erst kurz vor Redaktionsschluß bei uns eintraf und spontan überzeugte, 
mußte leider der angekündigte Assembler auf die nächste Ausgabe verschoben werden. 

Davon betroffen war leider auch der zweite Teil des BAS1C2-Lehrgangs für den PC 1512, der 
dem aktuellen Testbericht der Vortex-Festplatte z.um Opfer fiel und ebenfalls in der kommenden 
Ausgabe nachgereicht wird. 

An dieser Stelle möchten wir uns noch einmal ganz herzlich bei allen Lesern bedanken, die uns 
bei der Leserbefragung so toll unterstützt haben. 

Die Auswertung liegt nun vor und die Redaktion ist dabei, die vielen Anregungen in die Tat um¬ 
zusetzen. 

Wir wünschen Ihnen zunächst viel Spaß bei der Lektüre und möchten Sie schon jetzt auf unsere 
Geburtstagsparty im nächsten Heft einladen. 

Herzlichst Ihr 


Stefan Ritter 
Chefredakteur 
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1 Briefe 


Entschuldigung 

Ich möchte zum Leserbrief von 
Marina Mahnke Stellung 
nehmen! 

Vorerst, liebe Marina, möch¬ 
te ich Dir sagen, daß ich es su¬ 
perfinde, wenn auch Frauen 
sich ernsthaft mit Computern 
beschäftigen. 

Ich möchte mich bei Dir für 
die Ignoranz meiner Ge¬ 
schlechtsgenossen in voller 
Form entschuldigen. Leider ist 
es so, daß die Computerkids 
sich am besten mit diesen Ma¬ 
schinen auskennen. Die sind 
halt noch unreif, ohne Feinge¬ 
fühl. Ich selbst bin 38 Jahre 
alt, habe einen CPC 464 4 - 
Floppy. Muß mich sehr mit der 
Syntax usw. abquälen. Trotz¬ 
dem macht mir das Compu¬ 
tern Spaß und meine Spielpro¬ 
gramme verschaffen mir eini¬ 
ge Erfahrung. 

Liebe Marina, laß den Kopf 
nicht hängen und mach weiter 
so. 

P.S. Mit dem »Wis Männer 
wünschen« wirds nichts! 

Ewald Kijfi, Wien 

Nicht 

verwundert 

Der Brief von Marina Mahn¬ 
ke in der Ausgabe 12/86 hat 
mich nicht verwundert. Was 
sie da beschreibt, kann ich mir 
sehr gut vorstellen, denn ihre 
Erfahrungen sind keineswegs 
ein »Einzelfall«. 

Die Welt der Technik ist eben 
eine Welt von Männern für 
Männer. Wissen ist wirklich 
Macht, und so läßt sich über 
Wissensunterschiede auch ein 
Machtgefälle hersteilen. Und 
solche Wissensunterschiede 
produziert man am einfach¬ 
sten, indem man zum Beispiel 
Frauen den Zugang zu be¬ 
stimmten Wissensbereichen 
verwehrt (Frau Mahnke hat 
genau diese Erfahrung ma¬ 
chen müssen, als eine Zusam¬ 
menarbeit mit den fadenschei¬ 
nigsten Begründungen abge¬ 
lehnt wurde). Das Fatale an 
dieser Situation ist, daß dar¬ 
aus der Umkehrschluß gezo¬ 
gen wird, Frauen seien tech¬ 
nisch nicht begabt. Komi¬ 
scherweise kommt aber nie¬ 


mand auf die Idee, zu sagen, 
ein Italiener sei sprachlich un¬ 
begabt, weil er kein Deutsch 
kann (obwohl er immer noch 
besser dran ist, denn ihm. wer¬ 
den keine Steine in den Weg 
gelegt, wenn er es lernen will). 
Eine weitere Folge ist auch, 
daß Frauen in technischen Be¬ 
reichen viel höheren Anforde¬ 
rungen genügen müssen als 
Männer, um gleichermaßen 
akzeptiert z.u werden. Etwas 
nicht zu wissen oder zu können 
ist eben für eine Frau »ty¬ 
pisch«, für einen Mann »ver¬ 
zeihbar«. »Mann« kann ja 
nicht alles wissen, »Frau« soll 
nicht. 

Ich selbst habe auch schon 
viereckige Augen, aber ich fin¬ 
de, das sollte »uns Männer« 
nicht davon abhalten, mal 
über den Bildschirmrand hin¬ 
auszublicken und uns klarzu¬ 
machen, was an diesen »ver¬ 
teufelten kleinen Bits«, die wir 
alle so lieben, noch so alles 
dranhängt. Wir könnten ja zur 
Abwechslung mal unsere 
»männliche« Rationalität in 
diese Richtung lenken. Viel¬ 
leicht bleiben dann diese wirk¬ 
lich bescheuerten Erfahrun¬ 
gen, wie sie Marina Mahnke 
machen mußte, ihr und ande¬ 
ren Frauen in Zukunft erspart. 
Zeit wär ’s ja. 

Frank Sauer, Siegen 

FACHFRAU 

Über den Brief von Marina 
Mahnke war ich sehr über¬ 
rascht. Zwar bin ich am An¬ 
fang meiner Karriere auch auf 
Vorurteile gestoßen, die jedoch 
immer wieder überwunden 
wurden. 

Als ich nach dem Abitur Infor¬ 
matik studieren wollte, weil 
ich u.a. mathematisch und 
technisch interessiert bin, riet 
man mir immer wieder davon 
ab, mit der Begründung, dies 
sei kein Frauenberuf, weil er 
weder Herz und Gemüt an¬ 
spräche noch weibliche Tu¬ 
genden wie Sanftmut und Takt¬ 
gefühl verlange!!! 

Ich setzte mich durch, und als 
ich dann 1975 mein Abschluß¬ 
diplom (mit »hoher Auszeich¬ 
nung« vor meinen meist männ¬ 
lichen Studienkollegen) er¬ 


hielt, wurde ich als 
Programmierer-Analyst (in) ei¬ 
ner großen Bank angestellt. 
Von meinen Kollegen wurde 
ich vom ersten Tag an voll ak¬ 
zeptiert, aber die Abteilungs¬ 
leiter fragten regelmäßig nach 
einem der Herren Program¬ 
mierer. Mich hielten sie be¬ 
stenfalls für eine informatik- 
interessierte Sekretärin. Ich 
mußte mich ganz schön an¬ 
strengen, um z.u beweisen, daß 
auch eine »Fachfrau«ihre Pro¬ 
bleme lösen konnte. Hach ei¬ 
niger Zeit hatte ich es dann ge¬ 
schafft, nachdem ich die Ver¬ 
antwortung für einige Anwen¬ 
dungen übernommen hatte. 
Als ich bei der Geburt meines 
Sohnes meine Stellung aufgab, 
wurde das allgemein bedauert. 
Auch mich befriedigt das 
Hausfrauenleben nicht; so 
habe ich seit September 86 die 
Aufgabe übernommen, eine 
Clubzeitung zu editieren. Un¬ 
ser Verein hat mir dafür, auf 
meinen Vorschlag hin, einen 
PCW 8256 zur Verfügung ge¬ 
stellt. Dabei fand niemand es 
ungewöhnlich, daß der einzi¬ 
ge Computerexperte eine Frau 
ist. Mehrere Freunde haben 
mich seither gebeten, ihnen 
beim Einstieg in das Compu¬ 
terhobby zu helfen und erfra¬ 
gen meine Meinung beim Kauf 
eines PC. 

Ich bin bis jetzt keinem User- 
Club beigetreten, weil ich 
mich erst einmal selbst einar- 
beiten möchte. (Ich habe jetzt 
erst BASIC, Logo und Maschi¬ 
nencode gelernt). Das geht mit 
einer Informatikausbildung 
zwar schneller und leichter, 
aber doch nicht von selbst. 
Mein Ziel: aktive Mitarbeite¬ 
rin einer Zeitschrift wie der 
SCHNEIDER PC INTERNA¬ 
TIONAL z.u werden und dabei 
Vorurteile gegenüber Frauen 
und Computern abzubauen! 

Marie Josee Kodisch, 
Luxemburg 

Mein 

Leserbrief 

Liebe Redaktion, vielen Dank 
für den Abdruck meines 
Briefes. 

Da Sie ja zur Stellungnahme 
auffordern, möchte ich auch 


meinen »Senf« beitragen. Zum 
einen bin ich sehr erfreut über 
die durchaus positiven Reak¬ 
tionen, die mein Brief hervor¬ 
rief. Doch leiderhaben einige, 
die mit mir telefonisch Kontakt 
aufhahmen, sich nicht wieder 
gemeldet. Ich vermute, daß 
hier insofern ein Mißverständ¬ 
nis vorliegt. Diese Anrufer ge¬ 
hen bestimmt davon aus, daß 
ich mich vor » Angeboten« 
nicht retten kann. Ich würde 
mich daher sehr freuen, wenn 
Sie sich erneut melden wür¬ 
den. Ich hoffe sehr, daß es sich 
bei dem einen oder anderen 
Anrufer nicht nur um eine 
spontane Reaktion gehandelt 
hat, die hinterher bereut wur¬ 
de. Wenn doch, dann ist das 
wirklich schade und es zeigt, 
wie recht ich mit meinem Brief 
hatte. 

Außerdem braucht niemand zu 
befürchten, ich würde ihn nun 
»ausnutzen«. Bisher hatte je¬ 
der, der mit mir Kontakt auf¬ 
nahm, etwas »Spezielles zu 
bieten«. Es geht mir schließ¬ 
lich nicht nur darum, Pro¬ 
gramme zu erhalten, sondern 
auch um kleine Tips oder Er¬ 
fahrungen mit bestimmtem Zu¬ 
behör usw. Ein Tip über ein 
Buchz.B. ist auch schon sehr 
viel wert. Also keine Angst 
Freunde, ich beiße nicht!!! 

Es ist mir jedoch sehr wichtig, 
auf folgendes hinzuweisen: 
Mit dem Brief ging es mir nicht 
darum, daß ich nun nur wegen 
eben dieses Briefes Kontakt 
bekomme. Es ging vielmehr 
darum, auf das Problem allge¬ 
mein einzugehen. Daher wäre 
es schön, wenn nicht nur ich 
davon profitieren würde, son¬ 
dern auch viele andere Mäd¬ 
chen und Frauen. Vielleicht 
bleibt ja bei einigen anderen 
Lesern der Brief etwas in Er¬ 
innerung, und wenn man dann 
auf ein einsames Wesen treffen 
sollte, dann ist man vielleicht 
etwas entgegenkommender. 

Marina Mahnke, 
Hamburg 

Ein Club 

Als ich das Schreiben von Frau 
Mahnke las, dachte ich mir: 
»Das gibt es doch nicht!« So 
etwas darf es doch in unserer 
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Gewußt 

wo. 


Befehle, Funktionen, Kommandos .. 
egal zu welchem Rechner, welcher 
Software - nie kennt man sie alle, nur 
selten findet man sie auf Anhieb in 
einem Buch oder einer Zeitschrift. Oft 
wünscht man sich dann einen kompe¬ 
tenten Ratgeber, in dem man alles auf 
einen Blick hat. Ein Buch, wie die neuen 
DATA BECKER Führer, Alles übersichtlich 
geordnet. Nach Sachgruppen, alpha¬ 
betisch mit Kurzsyntax und nach Stich¬ 
worten. Wie sich Ihr Problem auch dar¬ 
stellen mag, mit einem Blick in den DATA 
BECKER Führer ist es bereits gelöst 


CWBasIc 
PC Basic 


DATA BECKER 
Führer zu 
GW/PC-BAS1C 
160 Seiten 
DM 24,80 



DATA BECKER 
Führer zu 
MS-DOS & 
PC-DOS 
176 Seiten 
DM 24,80 



DATA BECKER 
Führer zu 
TURBO PASCAL 
126 Seiten 
DM 24,80 



DATA BECKER 
Führer zu CP/M 
139 Seiten 
DM 19,80 



DATA BECKER 
Führer zu 
IST WORD 
ca. 200 Seiten 
DM 24,80 
erscheint ca. 1/87 


GfA 

BASIC 


An«» au' Blick 


De» DA1A BECKE» A<nn* 

Schneider 

CPC 


Att&i juf einen Bhck 




DtvOAM BfCKÖ? fu/ve. 


ATARI 

ST 


AKe» au' «>nw 8»ck 


DATA BECKER 
Führer zu 
GfA-BASIC 
254 Seiten 
DM 24,80 



DATA BECKER 
Führer zum 
Schneider CPC 
208 Seiten 
DM 19,80 


DATA BECKER 
Führer zum C64 
ca. 200 Seiten 
DM 19,80 

erscheint 87 


DATA BECKER 
Führer zu 
C64 Superspiele 
128 Seiten 
DM 19,80 


DATA BECKER 
Führer zu C16/116/ 
PLUS 4 

ca. 160 Seiten 
DM 19,80 

erscheint ca. 1/87 


DATA BECKER 
Führer zum 
ATARI ST 
ca. 200 Seiten 
DM 29,80 
erscheint ca. 1/87 




DATA BECKER 
Führer zum 
JOYCE 
181 Seiten 
DM 29,80 


DATA BECKER 

Merowingerstr. 30 • 4000 Düsseldorf -Tel. (0211) 310010 
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Aktuelle Spiele 

iMiita bestallt-mergelt geliefert! 

3-D Grand Prt*.39.90/49.90 




Allan Highway . 


49.90 










Btof®. 


.39.90/59.90 




Cotossus Chase 4.0. 


.39.90 

Combat Lyra. 


.29.90 

Crefton S Xunk. 


S9.90 

Cyrua II Chase. 


.39.90/59.90 










Elfte (Deutschi . 


79.90 







Exploding Fiat & Fighting Warrior . 

59 90 

Fighter Pilot (Deutsch) .. 


49 90 

Frankls goea to Hollywood 


.39.90 




FrankBruno'sBoxlng .... 


49.90 













The Wey of Uta Tiger . 


.39.90/49 90 

Highway Encounter. 


.39.90 




He*enküche II . 


.29.90 

Harter Attack . 


59 90 

Hunchback. 


.34.90 




KungFu Master. 


.39.90 

Knlght Rider. 


.39.90 




Lord of Middle . 


.39.90/49.90 

Movie ... 


49.90 










Mlsaon Elevator . 


.39.90/49.90 

Morty oo the Run 


.34.90 




Naveranding Story. 


.39.90 

Panzfldrome. 


.34.90 




Psychedelia. 


.34.90 

Ramoo. 


.29.90 







Sky Fox . 


.34.90 

Shogun . 


.34,90/49.90 







Space Invasion . 


.29.90 




Splndizzy. 


49.BO 

Sweevos World . 






Str. Force Harter. 


.39.90/49.90 




The Hacker. 



TauCeti . 






They sold a Mill. 


.39.90/49.90 

Tornado Low Level . 



Tomahawk. 






The Rocky Horror Show . 



■V- .. 






World Cup Cam. 


.39.90/49.90 

Wanted Gunfnght . 


.39.90 

Yle ar Kurrg Fu. 


34.90/49.90 







Jedes dieser Spiele ein echter Preishit 

Caves of Doom 9.90 

tnto Obitvlon 9.90 

Chillar 9.90 

Nontamquous 990 

Finders Keepers 9 90 

Soul of a Robot 9.90 

Foimula 1 9 90 

Sub-Sunk 9.90 

Loeomotion 9 90 

Wild Bunch 9.90 

One man and 

Trolfy Wally 9.90 

bis Droid 9.90 

Short» Fuse 9.90 

Nuclear Heist 9 90 

Storni 

990 

Molecuie Man 9.90 

Kane 

9.90 

Achtung) 



Eprommer für den Schneider 


CPC 464/664, 

Fertiggor St 298.50 

dito in gleicher Ausführung 


für den CPC 6126 


319.50 


Baustu o auf Anfrag« 

Software uif 3"-Diskette Aufpreis 15.00 

Software auf 5.25'-Diaket1e Aufpreis 5.00 

Eprom-Karte 264 für dan Schneider 
C PC 464/664 . Fertlggertt 249.50 

Eprom-Karte 264 für der Schneider 
CPC6128 Fertig gerit 259-50 

Bausatze auf Anfrage 
Software auf 3'-Diakette Aufpreis 15.00 

Software auf 5-25' -Diakette AufprelB 5.00 

Bachstraße 52 
D-7980 Ravensburg 
Telefon 0751/261 
oder 26497 




schauties 

electronic bauelemente 


heutigen Gesellschaft nicht 
mehr geben. (Man denke al¬ 
lein ans Grundgesetz, Artikel 
3, Gleichberechtigung zwi¬ 
schen Mann und Frau). 

Auch das Alter einer Person 
dürfte in einem Computerclub, 
der sich ernsthaft vorgenom¬ 
men hat, anderen zu helfen, 
wenn sie Probleme mit ihrem 
Gerät haben, und nicht nur als 
Kopierhöhle operieren, kein 
Grund sein, diese Person ab¬ 
zuweisen. Ich, selber Vorsit¬ 
zender und Gründer eines 
Clubs, bin regelrecht empört. 
Ich biete hiermit Frau Mahn- 
ke an, bei weiteren Problemen 
sich an uns zu wenden. Wir 
stehen ihr jederzeit zur Verfü¬ 
gung (Tel. täglich bis 24.00 
Uhr). 

Aus diesem Grunde bitte ich 
Frau Mahnke, sich mit uns in 
Verbindung zu setzen. 
Computerclub Leonberg 
Marcus Schindler 
Uhlandstraße 15 
7250 Leonberg 6 
Tel.: 0 71 52/2 18 22 


Disk-Mon 

Update 

Der Meinung des Herrn Die¬ 
ter Bauer (Leserbrief in Heft 
9/86) kann ich nur voll zustim¬ 
men, und seine Idee, den wirk¬ 
lich sehr guten Diskettenmoni¬ 
tor zum Lesen des Data- 
Formats zu bewegen, fand ich 
ausgezeichnet. Doch warum 
soll der Rechner das Format 
nicht selbst erkennen, bevor 
sich das Laufwerk mürrisch 
brummend auf die Suche nach 
dem verlangten Sektor macht? 
Er ist in dieser Hinsicht besser 
informiert als ich und kann es 
mir außerdem auch noch mehr 
oder weniger freundlich mit- 
teilen, welches Format anliegt. 
Databox- und auch andere 
Zeitschriften-Disketten hatten 
schon unterschiedliche For¬ 
mate. 

Im Listing des Herrn Bauer 
habe ich deshalb die Zeilen 
120 — 130 gelöscht und Zeile 
120 neu definiert. Die Zeilen 
324 — 326 geben das Format 
im Menue aus. 

Die Zeile 135 ermöglicht bei 
einem Ausstieg des Diskmoni¬ 


tors den Neustart, ohne das 
Binärfile nachladen zu müs¬ 
sen, was ja immer einen Dis¬ 
kettenwechsel erforderlich 
macht. 

Vielleicht kann mir ein MC- 
versierter Leser helfen, das 
»Filecopy« von VORTEX zum 
Lesen von Data-Disketten zu 
bringen. 

Leserbriefe sind oft eine wah¬ 
re Goldgrube. Vielleicht kann 
ich hiermit eine Kleinigkeit 
dazu beitragen. 

115 MEMORY & 5FFF.DEFINT 
a-z:MODE 2 
120 ofs = PEEK(&A89F) 

135 IF PEEK (&6000)=42 THEN 
GOTO 150 

140 LOAD“diskmon.bin 6000 

‘Maschinenroutine laden 

324 LOCATE 26,20:PR1NT“*** 
***************** 

325 LOCATE 28,21 ;IF PEEK 
(&A89F)=65 THEN PRINT 

System-Diskette " ELSE IF 
PEEK(&A89F) — 193 THEN 
PRINT “ Data-Format“ 

326 LO CA TE 
26,22:PRINT“********** 

Viktor Parnitzke 
Saarbrücken/Güdingen 

Mildernde 

umstände 

Liebe Marina Mahnke, 

Ihr Vorwurf ist, soweit ich dies 
beurteilen kann, durchaus be¬ 
rechtigt. Allerdings sollten Sie 
zur Kenntnis nehmen, daß 
man ohne weiteres milderne 
Umstände für alle Männer 
gelten lassen sollte, da eine 
Frau in der Computerbranche 
(noch) etwas Besonderes ist. 
Ich mußte nämlich auch schon 
öfter die Erfahrung machen, 
daß viele Frauen leider kaum 
Interesse an technischen Ge¬ 
räten, besonders an Compu¬ 
tern, haben. Deshalb ist wohl 
auch die Reaktion der erstaun¬ 
ten Männer verständlich 
(wahrscheinlich wäre ich ähn¬ 
lich überrascht gewesen). Dies 
rechtfertigt allerdings nicht 
die grundlegende Abwehrhal¬ 
tung gegenüber Ihnen. Mich 
würde deshalb gerne einmal 
interessieren,, welchen Grund 
die »Computerfreaks«, die von 
Ihnen erwähnt wurden, ha¬ 


ben/hatten oder auch in Zu¬ 
kunft noch haben werden, 
gleich wieder aufzulegen bzw. 
überhaupt kein richtiges Ge¬ 
spräch aufkommen zu lassen. 
Denn, daß Sie mit männl. Kol¬ 
legen durchaus klarkommen, 
zeigt schließlich Ihr Kontakt, 
den Sie in Ihrem Brief be¬ 
schrieben haben!!! 

Ralph Jabionski, 
Einbeck 

Pascal- 

Problem 

Die Antwort auf das Problem 
von Harald Baumgart im Heft 
12 (1986) war falsch. Pascal 
erlaubt wohl, einen INTEGER 
Wert in eine REAL Variabel zu 
legen. Sein Problem lag in der 
16-Bit Wort große, die Inte- 
gers auf den Bereich 
-32768. ..+32767beschränkt. 
Der Compiler wußte also, daß 
33000, als INTEGER-Kon- 
stante, nicht in 16 Bits paßt. 
Bei 33*1000 tat der Compiler 
aber nichts, und dem dann 
laufenden Programm war es 
offenbar egal, daß das Resul¬ 
tat die 16 Bits überließ und es 
druckte einfach die damit ne¬ 
gativ gewordene Zahl als 
REAL-Wert aus. Das kann 
man natürlich als einen Feh¬ 
ler in der Pascal-Version an- 
sehen, es hätte Krach geben 
müssen. Die Lösung ist ganz 
einfach: statt 33000, einfach 
33000.0 schreiben; der 
REAL-Bereich ist ja beträcht¬ 
lich größer. 

Dieter Britz, 
DK Abyhoj 

Gereizt 

Der Leserbrief von Frau 
Mahnke, Hamburg, reizt 
mich, eine Antwort aus mei¬ 
nem Berufs- und Privatleben 
zu geben. 

Im Privatleben habe ich noch 
wenig weibliche Homecompu¬ 
ter-Expertinnen kennenge¬ 
lernt; meine Einstellung zu 
den weiblichen Mitmenschen 
ist völlig unkompliziert. Com¬ 
puter hin — Computer her — 
ich bin froh, wenn fachliche 
Themen das Verständnis über 
die geistige Herausforderung 
Computer erweitern und ver- 
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halte mich auch entsprechend. 
Privat besitze ich einen 6128 
von Schneider und beschäfti¬ 
ge mich u.a. mit dBase und 
Wordstar. 

Beruflich habe ich die Aufga¬ 
be, Studenten (bisher aus¬ 
schließlich weiblicher Natur) 
auf ihren Beruf als Diplom- 
Dokumentär vorzubereiten 
und sie im Umgang mit der 
Datenverarbeitung zu betreu¬ 
en. Das Alterderjungen Frau¬ 
en liegt oft weit unter dem von 
Frau Mahnke und ich bin sehr 
froh darüber, daß diese eine 
ganze Menge nach dem Prak¬ 
tikumßr ihre Zukunft gelernt 
haben. 

Ich kann also mit Gelassenheit 
Frau Mahnke etwas auf¬ 
richten: 

Es gibt genug Frauen, die z.B. 
über die Berufsausbildung 
zum Computer gekommen sind 
und sich ebenfalls privat mit 
PC’s oder Heimcomputern 
ausstatten wollen. Nur diese 
Frauen sehen Computer nicht 
als Selbstzweck an (sie fragen 
nicht unbedingt: warum läuft 
dies so oder nicht so, sondern 
sie fragen, was kann ich damit 
persönlich anfangen) und sind 
viel interessierter, was Zähig¬ 
keit angeht, wenn in ihrem Sin¬ 
ne etwas nicht klappt und ein 
persönlicher Ehrgeiz geweckt 
wird. 

Ich wiederum bin froh, wenn 
die Praktikantinnen gelernt 
haben, den Umgang mit die¬ 
sen Automaten nüchtern zu se¬ 
hen und sie ihre eigene Metho¬ 
de gefunden haben, die vielen 
Möglichkeiten der Rechenma¬ 
schinen zu beherrschen. Dazu 
gehört z.B. auch, die engli¬ 
schen Handbücher durchzuar- 
beiten, interessante Komman¬ 
dos auszuprobieren und im¬ 
mer jemandem Löcher in den 
Bauch fragen zu können. 

Der männlichen Gilde kann 
ich nur raten, es ist ungerecht 
und unklug, Frauen und Mäd¬ 
chen geringzuschätzen, gar zu 
diskreditieren. Sie haben oft 
eine andere Art an die Dinge 
heranzugehen, aber mit Ge¬ 
lassenheit und Toleranz kann 
manches besser verpackt wer¬ 
den, sie nehmen keine Privile¬ 
gien in Anspruch, sie leisten 
eine Menge Arbeit. Natürlich 


gibt es auf beiden Seiten Fäl¬ 
le für den Psychologen, aber 
verallgemeinern gilt nicht. 
Sollte Frau Mahnke noch eini¬ 
ge Fragen haben, kann Sie 
sich selbstverständlich an 
mich wenden. 

Auch ich hoffe auf eine rege 
Leserbrief-Zuschrift an die Re¬ 
daktion und bin auf das ge¬ 
samte Echo auf diesen Leser¬ 
brief von Frau Mahnke ge¬ 
spannt. 

Manfred Hein 
Mülheim 

Log-in-Chaos! 

Wir hoffen, daß Sie uns ein 
wenig helfen, ein Übel aufzu¬ 
decken, das uns in den letzten 
Tagen hier im Club auf die 
Palme gebracht hat. 

Es dreht sich um den Akustik¬ 
koppler Dataphon S 21 D. Er 
wird in einem Komplettpaket 
angeboten, das eine Schnitt¬ 
stelle und ein Kabel enthält, 
das an den Joystickport ange¬ 
schlossen wird. Diese Lösung 
ist zwar schon lange umstrit¬ 
ten, aber was wir mit diesem 
Gerät erlebt haben, ist schon 
der Gipfel! 

Wir schlossen das Gerät an 
den CPC 464 und ein anderes 
an den CPC 664 an. Nun ver¬ 
suchten wir unsere erste Ver¬ 
bindung zu einer MAILBOX. 
Sie kam bei uns dann auch fast 
ohne Fehler auf den Schirm. 
Doch dann kam die große 
Überraschung, denn die Box 
verlangte nun eine Eingabe 
von uns. Aber unser Koppler 
spielte total verrückt, er 
schickte der Box immer wirre 
Zeichenfolgen. Zuerst nahmen 
wir das gar nicht so ernst, wir 
dachten, das liegt an der Para¬ 
metereinstellung. Aber weit 
gefehlt, denn der andere 
Koppler machte genau den 
gleichen Unsinn. 

Wir fuhren sofort wieder zu ei¬ 
nem bekannten Kaufhaus und 
tauschten die beiden Geräte 
um. Bei den nächsten Versu¬ 
chen genau das gleiche, wir 
konnten keine MAILBOX an 
die Strippe bekommen, mit der 
wir kommunizieren konnten. 
Zum Glück hat dann ein ent¬ 
nervter SYSOB seinen Hörer 
aus dem Modem gerissen, er 


— WEB — 

Die 20 MB WINCHESTER-EXPANSION-BOX für JOYCE 

(kein Nachbau!) 

kompatibel mit LOCOSCRIPT und CP/M PLUS 
mit formschöner Aufbaukonsole 
Controller-Card, Kühlsystem, Netzteil 
und 

QUICK-DATA WEB 

Das erste GSX-Geschäftsprogramm speziell für Festplattenbetrieb 
und 18 MB Datenbank 
für die Probleme des Versandgeschäftes 
(NN-Paket/NN-Päckchen/NN-Brief) 

mit Standards ITOH Serie 8510 BP. SP BINDER MFP 6000 


QUICK-CALC 2.1 

Buchhaltung 

148 DM 

QUICK-BILL 2.0 

Angebot, Rechnung 

168 DM 

QUICK-NAME 2.0 

Adressverwaltung 

128 DM 

QUICK-CINE 2.0 

Videoarchiv 

98 DM 

QUICK-DATA 3.0 

Geschäftssoftware GSX™ 

228 DM 

QUICK-DATA WEB 

nur Festplattenbetrieb 

498 DM 

QUICK-MAHN 3.0 

Modul für Mahnwesen 

68 DM 

QUICK-STAT 3.0 

Modul für Statistik 2 

78 DM 

QUICK-ZAHL 3.0 

Modul für Zahlkarten 

119 DM 

KIT PC8256/TMS 

512KB RAM-Erweiterung 

99 DM 

DISK DRIVE 1MB 

Laufwerk für JOYCE 

564 DM 

FILTER 

Bildschirmfilter 

79 DM 

LocoMail 

Mail Mergef. V 1.21 

p.A. 

LIGHT-PEN 

incl. Software 

p,A. 

MOUSE 

komp. DIGITISER/DR DRAW 

p.A. 

DIGITIZER 

komp. MOUSE/PEN 

p.A. 

WINCHESTER 

Expansion Box, 20 MB 

p.A. 

FAX-ADAPTOR 

Telefax, Telex 

p.A. 


Fordern Sie unser Info-Material an! 


Fa. P. WERDER - Nachrichtentechnik 

Sprechzeiten Mo-Fr: 9- 11/14-16 Uhr 

Bramfelder Ch. 215-2 Hamburg 71 • (040) 641 1779 
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SOFTWARE FÜR ALLE!! 

SMekr 

Cassette ode 


r PAKET 1: Red Hawk, Superman, Zorro 
PAKET tl: Donald Duck's Playgroung. Hard Ball 
Yle Are Kung Fu 

PAKET HJ: Time Tunnel, Zoids, Fight Night 

Commodorw und Schnmtdwr 

Du hesl nur ein Zlei Du w«l»«l zu unt D»o Zed <st knapp* Denn eines weift! Du gen* 

B snau, auch die endaron Compularfroaks müssen dese Anzeige gelesen haoen 
u box! und belftt dich durch Du Ölst In Aktion! Du kannst keinen klaren Gedanken 
mehr!«.«.- Stimm, .. «Milch!? ,. MWH , KrMt , MtWlnn)rl 9,0*».« 

JAAAUI JAAAÜI JAAAM! ES STIMMT!! HOL DIS OIE DINGER!!! Brandneu« Orion 
nalware! Auch in Caasettentorm erhSlllich. Alls Software llelerbar (0r Commodore 
und Schneider, bei: 

SOfTWARE-VERSAHO HEIN-HOYER-STRASSE 5 ' 2000HAUBURG 4 - TU. 040/31 OS »0 

Geeamtilsl« 2.- OM In Briefmarken ■ Versand 5,- DM * NN-Gebühr 

Sonderaktion 

3 Compulerspiele — Sie haben richtig gelesen: DREI COMPUTERSPIELE — erhalten Sie von uns zu 
einem noch nie dagewesenen Preis von nur 59,90 DMchen. Dies aber nur solange der Vorrat reicht! 

Gleichgültig ob Casselte oder Diskette Alles ist untereinander mischbar, z B 2 Disketten, 

1 Cassette oder 2 Cassetlen und 1 Diskelle Ganz wie Sie wünschen 

Los gehts! Anruf oder Postkarte genügt 


NOCH SIND SIE ZU HABEN - SOLANGE VORRAT REICHT !1I 


Cg-,-T d^r»_C6 
Amazon Woman 
Dambo 

E'.ectiagl ide 1+Atari) 


HnxänXüche : 


Spiky llarrnld 


5=bDSidgE.0i|1SSS«D 

Tho »old a Milllon2 
t'ocbiddcn Planet 


Davl«a Snooker 


High May Znccunta. 


Versand erfolgt per Nachnahme * 5.-DH 

Versand erfolgt per Vockasse * 2.-DM (Euroscheck) 


SOFTWARE-VERSAND HAMBURG 

Inh : Albertus Comelissen Hein-Hoyer-Str 5 2000 Hamburg 4 Tel.: 040/310990 
Bankverbindung: Postglroamt Hamburg Klo-Nr 379913 207 (BLZ 200100201 
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FESTPLATTEN-NACHRÜSTSÄTZE 

LAPINE 


- wenn neben Preis auch Qualität zählen soll 

Die erste Winchesterkarte mit integriertem 

Kopfhebemechanismus 


- Einfachster Einbau (incl. Einbauanleitung) 

- Lange Lebensdauer (28000 ausfallfreie Std.) 

- 65 ms/35 ms Zugriffegeschwindigkeit 

- geräuscharm (unter 40 dBA) 


- unter 14 Watt Leistungsbedarf 


LAPINE 21 MB Erweiterungs-Set, 


65 ms incl. Controller 

1.295 - 

LAPINE 33 MB Erweiterungs-Set, 


35 ms inci. Controller 

1.395- 

LAPINE 21 MB Drive Card, 65 ms 

1.345- 

LAPINE 33 MB Drive Card, 35 ms 

1 495- 

Hauptspeichererweiterung auf 640 KB 65,- 

Prozessor NEV V 30 8MHz- 


verkürzt Zugriff um 40% 

90,- 

Druckerkabel IBM/Centronics 


für PC 1512 

48,- 

Software zur Bildschirmoptimierung 


für PC 1512 

90,- 

Software zur NEC Drucker- 


Parametersteuerung 

120- 

Public Domain 

a.A. 

NEC P6 parallel incl. 


dt, Handbuch + Druckerkabel 

1.545,- 

NEC P7 parallel incl 


dt. Handbuch + Druckerkabel 

1 998,- 

Schneider PC 1512 MM/SD 

1.999,- 

Schneider PC 1512 MM/DD 

2.499,- 

Schneider PC 1512 CM/SD 

2 499- 

Schneider PC 1512 CM/DD 

2.999.- 

ÄT-Kompatible 


(Eigene Produktpalette) ab 2 995.- 

Händleranfragen erwünscht 


GEBR. NICKELSEN + PARTNER 

Daten- und Kommunikationstechnik 

7407 Rottenburg 1 • Graf-Wolfegg-Straße 75 

Telefon 07472/22001-03 




elektro GmbH 

Delsterner Straße 23 
5800 Hagen 1 
Telefon 0 23 31 / 7 26 08 


• NEU • NEU • NEU • NEU • 

Computer 24 Monate mieten statt kauten. 
Jetzt kaulen und in 6 Monaten bezahlen 


Schneider PC 1512 

Monochrome/ 

Einzelleufwerk 


Schneider PC 1512 

Farbmonitor/ 

Doppellaulwerk 


Schneider Joyce Plus 


Mietpreis 92 - OM 

Kaufpreis 
1999 -OM 


Mietpreis Mi,-OM 

Kaufpreis 
2999 - OM 


Mietpreis 107,- DM 


Kaufpreis 
2275 - OM 


Mietpreis 24 - DM 


Kaufpreis 
59*. - OM 


Mietpreis 29.- DM 


Kaufpreis 
648,- OM 


Ständig die neuesten Spiele und 
Anwenderprogramme »ur Schneider Cf»C 
lieferbar I 


Katalog gegen Rückporto (1,— DM in Briefmarken) 
Sämtliche Uelerungen erfolgen zzgl. Porto + Ver¬ 
packung 
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hat nämlich gedacht, daß sei¬ 
ne BOX defekt sei. Wir unter¬ 
hielten uns mit ihm und muß¬ 
ten überrascht feststellen, daß 
wir nicht die ersten waren, die 
mit diesem Gerät auf die Nase 
gefallen sind. Wir glauben, 
daß das ganze System über 
den Joystickport von der Fir¬ 
ma Woerltronic nicht richtig 
umgesetzt worden ist. 

Computer-Club 
Magig Key, Bremen 


PC: 

Wir haben Die Fa. Woerltro¬ 
nic um eine Stellungnahme ge¬ 
beten. Diese wird nach Ein¬ 
treffen an gleicher Stelle ver¬ 
öffentlicht. Auch sollten sich 
Leser mit ähnlichen Proble¬ 
men hierzu äußern. 

Format erkannt 
Gefahr gebannt! 

Ich bin nun fast schon zwei 
Jahre stolzer Besitzer eines 
CPC 464 mit DDl 1. Seit kur¬ 
zer Zeit programmiere ich 
auch ein wenig in Maschinen¬ 
sprache. Unter anderem 
schrieb ich ein Programm, 
welches darauf angewiesen ist, 
die Diskette sektorenweise le¬ 
sen zu können. Dazu benötigt 
man ein kurzes Maschinenpro¬ 
gramm, welchem man u.a. 
auch das Format der zu lesen¬ 
den Diskette übergeben muß. 
Leider kam es gerade hierbei 
zu mehreren unangenehmen 
Read Fails, die den Program¬ 
mablauf stets total durchein¬ 
ander brachten. Durch folgen¬ 
des kleine Listing kann man 
das Format der momentan im 
Laufwerk befindlichen Disket¬ 
te erfahren: 

10 OPENOUT'DUM ":CLOSEOUT 
20 a=PEEK (43167) 

30 IFa -193 THEN PRINT “DA¬ 
TEN FORMAT" 

40 IFA =65 THEN PRINT“CPM 
FORMAT" 

50 IFa = 1 THEN PRINT“IBM 
FORMAT“ 

Ulrich Otto 
Obemdorf-Boll 


Aufgefordert 

Im allgemeinen keine Freundin 
von Leserbriefen fühle ich 
mich nun doch aufgefordert, 
Stellung zu beziehen. 

Ich bin 33 Jahre alt, seit März 
85 Leserin Ihrer Zeitschrift, 
Besitzerin eines CPC 6128 und 
SP-lOOOCPC-Druckers. Be¬ 
ruflich bin ich damit beschäf¬ 
tigt, Software für mittlere Da¬ 
tentechnik zu verkaufen (Vor¬ 
führungen, Messen etc.) 

Das gestörte Verhältnis der 
meisten Männer zu Frauen, 
die etwas von Computern ver¬ 
stehen, kenne ich nur allzu gut. 
Auf der CeBIT zum Beispiel 
kann man frau?) immer wie¬ 
der studieren, wie irritiert ei¬ 
nige Herren reagieren, wenn 
statt des erhofften Mannes, der 
ihnen nun das Programm er¬ 
läutert, eine Frau auftaucht. 
Manche sind sogar so frech 
nachzufragen, ob man denn 
auf diesem Gebiet auch wirk¬ 
lich »zu Hause« sei (bevor man 
überhaupt Gelegenheit hatte, 
den ersten Satz zu sprechen). 
Mit der Zeit habe ich mir ein 
dickes Fell angeeignet, außer¬ 
dem kann ich die Jungs auch 
schnell davon überzeugen, daß 
ich mitreden kann. 

Die Möglichkeit, mal an einen 
Club zu schreiben, habe ich 
aus den o.g. Gründen noch 
nicht wahrgenommen. Ich 
konnte mir recht gut vorstel¬ 
len, wie die Reaktion auf eine 
Frau sein würde. Und der 
Brief von Marina Mahnke aus 
Hamburg scheint mir Recht zu 
geben — oder? 

Also tüftele ich zu Hause so an 
meinem Computer herum, tip¬ 
pe mal ein Listing aus Ihrer 
Zeitschrift ab, schreibe mal 
selbst ein Programm; viel Z)eit 
hat man als berufstätiger 
Mensch ja nicht, aber so man¬ 
ches Wochenende ist auch 
schon dabei draufgegangen. 
Bei auftretenden Problemen 
helfe ich mir durch Zeitschrif¬ 
ten und Bücher Studium, au¬ 
ßerdem kann ich mal meine 
Kollegen Programmierer fra¬ 
gen, die recht willig (aber 
manchmal auch recht ab¬ 
strakt) Auskunft geben. 

Karola Kaspschak, 
Hohnhorst 


»Allgemein« 

Wahr ist, daß Frauen auf tech¬ 
nischem Gebiet im ALLGE¬ 
MEINEN Zweitklassigkeit in 
Bezug auf ihr Know-How vor- 
geworfen wird, nur — und die 
Hervorhebung des Wortes 
»allgemein« deutet das schon 
an - darf diese ungerechtfer¬ 
tigte Haltung nicht auf alle 
Freaks bezogen sein! 

Um der Tendenz zu separaten 
Computerfreakmachtblöcken 
aus Frauen beziehungsweise 
aus Männern entgegenzuwir¬ 
ken, biete ich MARINA 
MAHNKE an, ihr bei der Lö¬ 
sung von »ganz normalen Pro¬ 
blemen« (Zitat) zu helfen... 

Schüler Olaf Stoyke 
TURBO CLUB BERLIN 
Wexstraße 33 
1000 Berlin 31 

Eisenbahn 

Betrifft die Klage der Frau 
Mahnke in der Ausgabe 12/86. 
Mein Haupthobby ist die Ei¬ 
senbahn und die Modellbahn. 
Auch hier in unserem Hobby 
muß ich immer wieder feststel¬ 
len, daß die Frau in diesem 
Hobby nicht akzeptiert wird. 
Erst wenn eine Frau bewiesen 
hat, daß sie selbst mehr von 
unserem Hobby Modellbahn in 
ihrem Köpfchen hat, wird sie 
als vollwertige Modellbahne¬ 
rin anerkannt. Und gerade in 
der Computer-Ausbildung 
habe ich Frauen kennenge¬ 
lernt, welche ihren Kollegen 
haushoch überlegen waren. 
Aber auch diese Kollegen 
wollten es nicht zugeben. 
Leider. 

Umbau Bogusch 
Rauschenberg/Josbach 

Mädchen und 
Computer 

Ich möchte auch mal meine 
Meinung zum Thema »Mäd¬ 
chen und Computer« loswer¬ 
den (auch wenn einige meinen, 
ich wäre noch nicht qualifiziert 
dazu). 

Ich (15, männlicher Natur) 
glaube, das ganz gut beurtei¬ 
len zu können. Schließlich 
werde ich jeden Tag in der 
Schule damit konfrontiert, 
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wenn die Mädchen aus meiner 
Klasse sich über die Computer 
ihrer Väter, Brüder oder 
Freunde unterhalten. Leider 
kommt nur sehr, sehr selten 
ein gutes Gespräch dabei her¬ 
aus, da die Mädchen fast nur 
Spiele im Kopf haben. 

Meiner Freundin habe ich das 
ganz gut beigebracht (glaube 
ich). Am Anfang hatte meine 
Freundin eine unheimliche Ab¬ 
neigung gegen Computer. 

Aber nachdem ich ihr gezeigt 
habe, daß man mit dem Com¬ 
puter auch noch anderes ma¬ 
chen kann als außerirdische 
Kretins abschießen, war sie 
ganz begeistert. Allerdings 
kann man sie jetzt wirklich 
nicht »Computer-Freak« nen¬ 
nen. Sie hat das Ganze nur an¬ 
genommen und akzeptiert den 
Computer — nicht mehr und 
auch nicht weniger. Allerdings 
kenne ich auch sehr viele 
Mädchen in meinem Freun¬ 
deskreis, die Computer nicht 
mal anschauen mögen. Das ist 
zwar schade, aber ich akzep¬ 
tiere das. Schließlich ist deren 
Anerkennung gegenüber dem 
Computer nicht ganz so wich¬ 
tig, wie die meiner Freundin. 
Schließlich muß sie mit mir 
und dem Computer leben. Und 
ich bin sehr froh darüber. 

Jens Linstädt 
Gifhorn 

Cfür Joyce 

Wer kennt C für Joyce? Gibt es 
für den PCW8256 — Joyce die 
Programmiersprache C, d.h. 
Sprachinterpreter mit Syntax¬ 
prüfung, Compiler? 

Unter welchem Betriebssy¬ 
stem? 

Entspricht diese C-Program¬ 
mierung den grundlegenden 
Ausführungen von Kernig- 
han/Ritchie — z.B. im Hin¬ 
blick auf »Portabilität«? 

Friedhelm Seher 
Maintal 1 


Hard- und 
Software 

Seit einem Tag benutze ich den 
Schneider Joyce PCW 8256. 

Gleichzeitig bemühe ich mich, 
in den verschiedenen Compu¬ 
ter-Zeitschriften die richtige 
Hard- und Software zu finden. 

In der Zeitschrift PC Schnei¬ 
der International (Nr. 12/86) 
habe ich durch die zahlreichen 
computerspezifischen Insera¬ 
te meine Wünsche befriedigen 
können. Mit meinem Joyce 
war es auch kein Problem, 
dann die erforderliche Info an¬ 
zufordern. 

Zuletzt möchte ich Sie noch 
zur Qualität Ihres Magazins 
beglückwünschen: Schon ein 
Jahr vor dem Kauf meines 
Computers habe ich zahlrei¬ 
che Fachzeitschriften gekauft, 
um mich über den aktuellen 
Stand auf dem Sektor Home- 
respektive Personal- Computer 
zu informieren. 

Nach sehr intensiver Suche 
habe ich mich dann für den 
Kauf des o.g. Joyce, und 
schließlich für ein Abo Ihrer 
Zeitschrift (incl. DATABOX) 
entschieden. Dabei möchte ich 
bemerken, daß ich ein ganz 
normaler Anwender bin und 
durch meinen zeitraubenden 
Beruf keine Zeit habe, selbst zu 
programmieren. Doch gerade 
auch für die nicht» Computer- 
Freaks« bietet Ihre Zeitschrift 
sowohl durch den redaktionel¬ 
len als auch durch den aus¬ 
führlichen Inseratteil die opti¬ 
male Information. 

Dieser Leserbrief soll auch 
PC-Interessenten Mut ma¬ 
chen, die wie ich, sich über¬ 
wiegend nur für die Anwen¬ 
dung eines PC interessieren. 

Ich wünsche Ihnen weiterhin 
viel Erfolg. 

Dr. med. Marius Brach 
4250 Bottrop 


Was bezahlen Sie 
für Software? 

Software muß nicht teuer sein! Wenn Sie bisher viel Geld für Program¬ 
me ausgegeben haben, die dann doch nicht Ihren Vorstellungen ent¬ 
sprachen, haben wir ein tolles Angebot für Sie: Public-Domain-Software 
für CP/M aus den USA Nur bei uns bekommen Sie diese Programme 
und die mitgelieferten Dokumentationen in deutscher Sprache - ga¬ 
rantiert lauffähig auf Ihrem Schneider-Computer: 

Diskette 1: Pascal-Compiler JRT-Pascal - erfüllt 
alle Anforderungen von Standard-Pascal 
Diskette 2: Assembler-Paket mit Z80-Assembler, Linker 
und intelligentem Disassembler 
Diskette 3: Künstliche Intelligenz - Interpreter für LISP und 
PROLOG 

Diskette 4: C-Compiler Small-C - verarbeitet sogar Fließ¬ 
kommazahlen 

Diskette 5: Forth-83 - sehr vollständige Implementation der 
Sprache Forth 

Diskette 6; CP/M-Hilfsprogramme wie SQ (komprimiert 

Dateien bis 60%), Diskettenmonitor u.v.a. 
JRT-Pascal und Small-C benötigen auf dem CPC-464/664 eine Spei¬ 
chererweiterung (64K genügen), LISP ebenfalls, PROLOG hingegen 
nicht Auf Joyce und CPC-6128 ohne Erweiterung Alle anderen Pro¬ 
gramme laufen auch in der Grundversion des Computers. Disketten 1-4 
mit WordStar-kompatiblem Editor. 

Jede Diskette kostet sage und schreibe nur 30 Mark. Bitte geben Sie 
an, ob Sie eine 3-Zoll-Diskette oder eine 5 25-Zoll-Disk (Vortex-Format) 
wünschen. 

Lieferung per Nachnahme oder Vorauskasse. Keine Versand- oder Ver¬ 
packungsgebühren! 


MARTIN KOTULLA 

Grabbestraße 9, 8500 Nürnberg 90, 
Telefon: 0911/303333 


DISCOVERY PLUS - einzigartiger Tape to Dlec Transfer 

Jetzt 4 Transferprogramme. Kopien normale, headerlose, Speedlock und Turboload- 
Programme von Kassette auf Diskette, auch Programme, bei denen bisher „nichts zu machen" 
war. Alle Telle kinderleicht zu handhaben, ohne Programmierkenntnisse (auch für Anfänger). Mit 
100 Beispielen. Die Zeitschrift AMSTRAD-ACTION schneb zum alten DISCOVERY; „Probably 
the best tape to disc copter". 

Für CPC 464/664/6128 3 "-Diskette nur DM 59,90 

DISCUS DISCovery User Service. Insges. 160 Transferpro¬ 
blemlösungen in DISCUS 1, 2 u. 3. Pro DISCUS DM 5,—. Bel separater Bestellung + DM1 


HANDY MAN - 416 k auf 3 ' -Diskette!!! 

60kmehr auf jeder Diskette. Das Utilitypaket HANDY MAN schafft es. Superschnelles Formatier¬ 
programm für aHe Amsdos-Formate plus SUPERMAT 202k u. SUPERMAT 208k. Die neuen For¬ 
mate sind voll softwareunterstützt SUPERMAT läuft auch unter CP/M. Wahlfrei im Erst- oder 
Zweitlaufwerk MENU MAKER Diskettenprogramme menügesteuert verwalten und starten (alle 
USER-Ebenen), DIRectory komplett „aufräumen" Weitere Utilities wie DISCSEARCH, FILESE- 
ARCH (Editorfunktion, String-Textsuche etc.) für alle Formate. Superschneller Backup von Dis¬ 
kette aut Kassette. 7 Programme! Ein Wahnslnns-Paketl 

Für CPC 464/664/6128 3 "-Diskette nur DM 59,90 


MASTERDISC Dlsketten-Utllltles, Transfer, Editor, Backup, etc. 

Backup von Disketten, auch illegale Sektoren, unformatierte Spuren usw. Gelöschte Files retten. 
Alle Directory-Einträge editieren und verändern. Fast-Formatter, File-Copy, Sektor-Editor usw. 
Insges. 12 Super-Utilltleel! 

Spitzentools für CPC 464/664/6128 3 "-Diskette nur DM 59,90 


DISC MATE - CP/M PLUS UTILITIES für den JOYCE, JOYCE PLUS 

Gelöschte Files retten und vor Löschen schützen. USER wechseln, etc. Fites verstecken/sichtbar 
machen. DIRectory-Editor Sehr komfortables und schnelles Kopierprogramm, ideal für den 
schnellen Backup wichtiger Daten. Laufwerks-Speedup um 20%. 

Ein Muß für den JOYCE-User. 3 "-Diskette nur DM 79,90 

3’ '-Leerdisketten (Maxell) 10 Stck. DM 79,— 
Spiele, Spiele, Spiele Preise auf Anfrage 

(telefonisch oder schnfllich] 

3-Zweltlaufwerk AMDRIVE 
zum Hammerpreis von DM 333,- 

(CPC-Typ angeben). 


Inlos gegen OM 1.50 m BinHmaiken fle-ueli.inqpn unler DM 120, - plus OM 5 lur Porlo. Lieferung per 
Macrinahme (. GeD.ihii oder gegen Vorauv.i neck AuslandsbeM(.■Hungern gegen Voiau^sclwck Tolelonbe- 
Moilung und Inlo von Q 00 - 10 00 und 15.00 *S 50 Uhr 

PR8-Soft waredienst Telefon 

Postfach, D-8702 Eisingen 09306/87 35 
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-Info 


Die folgenden Anpassungen 
gelten nur für die Disc- 
Version! 

1. Anpassung an Drucker, 
die die Bitbild-Bytes verkehrt 
herum drucken (das MSB 
unten statt oben): 

POKE &A180,&1B: POKE & A18A, 
&CB:POKE &A18B,&3F 

2. Anpassung an Drucker, 
die einen vertikalen Punkt¬ 
stand von 1/60” statt 1/72” 
haben (Symptom: Hardcopy 
wird zu lang): 

POKE &A1E1,100:POKE &A1E3, 
125:POKE &A1E4,63:P0KE 
&A1E6,80 

Beide Anpassungen sind für 
den NEC P2 Pinwriter er¬ 
forderlich. Weiterhin benö¬ 
tigt er folgende Steuerse¬ 
quenzen: 

(i) 

27 ESC Papiermangel über¬ 
gehen 
120 x 

27 ESC 28/240“ Zeilenabstand 
51 3 
48 0 
50 2 
56 8 

27 ESC horizontaler 
77 M Punktabstand 1/120“ 
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( 2 ) 

13 CR 

10 LF 

0 
0 
0 
0 

27 ESC 8-Bit-Punkt-Modus 
83 S 

48 0 800 Bytes 

56 8 
48 0 
48 0 

Anpassung an Drucker, die 
im Grafikmodus doppelter 
Dichte (ESC L) 1280 Bitbil¬ 
der pro Zeile drucken, an¬ 
sonsten aber voll Epson- 
kompatibel sind (z.B. 
CPA-80 GS): 

COPY-SHOP laden und 
starten, mit ESC abbrechen 
und folgende Direkteingaben 
vornehmen: 


POKE &A03E,&CB:POKE 
&A03F,&3F:POKE 
&A040,0;POKE 
A0EA,&D7 < RETURN > 
POKE &A195,76:POKE 
&A196,4 < RETURN > 
POKE A1E0,107: POKE 


A1E1,30:POKE 
A1E2,133:P0KE A1E3,37 
<RETURN> 

POKE A1E4,80:POKE 
A1E5,1 10:POKE 
AlE6,96:POKE A1E7,133 
<RETURN> 

Programm neu starten, im 
Anpassungsmenue folgende 
Änderung vornehmen (2. 
Steuersequenz), dann CO¬ 
PY-SHOP testen und neu ab¬ 
speichern. 


27 ESC 
76 L 
76 

4 (76 + 4*256= 1100 Bit¬ 

bilder) 


Anpassung an den Seikos- 
ha GP 500 CPC 

1. Anpassung an umge¬ 
drehte Bitbilder (Nieder¬ 
wertigstes Bit oben). 

POKE &A180.&1B: POKE 
&A18A,&CB:POKE &A18B,&3F 
< ENTER > 

2. Anpassung an den Bit¬ 
bildmodus einfacher Dich¬ 
te (480 Bitbilder pro Zeile), 
geht nur beim Seikosha GP 
500 CPC. 

POKE &Al95,144:POKE &A196,1 
<ENTER> 

stellt den internen Zähler auf 
400 Zeichen, und 

POKE &A1E0,40:POKE 
& A1E2,50: POKE 
&A1E5,80:POKE A1E7,100 
<ENTER> 

sorgt für die doppelte Schritt¬ 
weite bei der Abtastung des 
Bildschirms. Im Anpassungs¬ 
menue (Spalte 2) muß dann 
die Folge 27,75,3,16 den Ab¬ 
schluß bilden. Allerdings wer¬ 
den Hardcopys in MODE 2 


nur noch im Format 3” kor¬ 
rekt wiedergegeben. Die an¬ 
deren MODEs dürften je¬ 
doch keine Probleme erge¬ 
ben. Weiterhin ist durch die 
geringere Punktdichte eine 
generelle Qualitätseinbuße 
im Vergleich zum Epson- 
Standard unvermeidlich. 


3. Anpassung an einen ver¬ 
tikalen Punktabstand von 
1/63” anstatt standardmäßig 
übliche 1/72”. 

POKE &A1E1,105: POKE &A1E3, 
130:POKE &AlE4,67:POKE 
&A1E6,80 < ENTER > 

Alle diese Sequenzen setzen 
voraus, daß die Disketten- 
Version vorliegt: sie werden 
nach dem Laden, Starten und 
Abbruch (ESC) von COPY¬ 
SHOP direkt eingegeben. 
Danach erfolgt der Neustart 
und Test des Programms. 


Copy-Shop 

mit 

Vortex-Laufwerken 

Neues gibt es von unserem 
Hardcopyprogramm Copy- 
Shop zu vermelden: In einer 
angepaßten Version steht die¬ 
ses Programm nun auch Be¬ 
sitzern einer Vortex- 
Zweitfloppy unter VDOS zu 
Verfügung. 

Einzige Einschränkung: Das 
auf dem jeweiligen Copy- 
Shop-Datenträger mitgelie¬ 
ferte Programm »SCRSA- 
VE«, welches mit der Tasten¬ 
kombination <CTRL+ 
SPACE > beliebige Screens 
auf Disk abspeichert, arbei¬ 
tet nur nach Entfernen des 
Vortex-Controllers. Auf 
Wunsch können Vortex- 
Floppy-User eine im Vortex- 
Format aufgezeichnete Copy- 
Shop-Version auf 5,25” 
Diskette erhalten. 
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PLÖTZLICH 
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I—Schneider Aktuell 


Scanner 


MICRO Pro mit 

neuem 

Konzept 

Hauptprodukt von MicroPro 
ist die meistverkaufte Textver¬ 
arbeitung der Welt, das Pro¬ 
gramm Wordstar mit über 2,5 
Millionen Exemplaren. In Zu¬ 
kunft wird sich das Augen¬ 
merk der Verantwortlichen 
ausschließlich auf die drei 
Produktbereiche Wordstar 
2000, Wordstar mit Mailmer- 
ge und Wordstar Extra kon¬ 
zentrieren. 

Das im Frühjahr ’86 vorge¬ 
stellte Textverarbeitungspro¬ 
gramm EASY wird dagegen 
aus dem Programm genom¬ 
men. Dieses Programm steht 
jedoch als Wordstar 1512 von 
der Fa. Schneider zur Verfü¬ 
gung. 

Info für Wordstar 2000 etc.: 
MicroPro, 8000 München 80 
für Wordstar 1512: 
Schneider-Fachhandel □ 


PC 1512 in 
England teuer 

Wie jetzt bekannt wurde, sind 
die Preise des neuesten 
Amstrad-Renners aufgehoben 
worden. So kostet nun der PC 
1512 in der Grundausstattung 
statt 399 £ immerhin 450 £ 
plus MwSt. Die Preiserhöh¬ 
ung war nötig geworden, da 
der japanische Yen um etwa 
25 % gegenüber dem engli¬ 
schen Pfund zugelegt hatte. Da 
die Amstrad-Rechner in Korea 
gefertigt und in Yen bezahlt 
werden, folgte eine Preiserhö¬ 
hung der Computer um ca. 
12,5 % im Durchschnitt. 

Zur Zeit werden monatlich 
etwa 70.000 Computer gefer¬ 
tigt, die Stückzahlen werden 
weiter steigen. Schwierigkei¬ 
ten gibt es bei der Lieferung 
von Hard-Disk-Modellen des 
PC 1512, der erwartete Anteil 
an der Gesamtmenge von 6 % 
liegt mit 35 % weit über der 
Kalkulation. □ 


Bundes¬ 

verband 

Computerclubs 

Der Computerclub Leonberg 
plant die Gründung einer 
Dachorganisation aller deut¬ 
schen Computerclubs. Nähe¬ 
re Informationen können alle 
Clubs unter folgender Adres¬ 
se abrufen: 

Computerclub Leonberg 
Marcus Schindler 
Uhlandstr. 15 

7250 Leonberg 6 □ 

Copyshop mit 

vortex- 

Laufwerken 

Neues gibt es von unserem 
Hardcopyprogramm Copy¬ 
shop zu vermelden: In einer 
angepaßten Version steht die¬ 
ses Programm nun auch den 
Besitzern einer Vortex-Zweit- 
floppy unter VDOS zur Verfü¬ 
gung. 

Einzige Einschränkung: Das 
auf dem jeweiligen Copyshop- 
Datenträger mitgelieferte Pro¬ 
gramm < Scrsave >, welches 
mit der Tastenkombination 
<CTRL+SPACE> beliebige 
Screens auf Disk abspeichert, 
arbeitet nur nach Entfernen 
des Vortex-Controllers. Auf 
Wunsch können Vortex- 
Floppy-User eine im Vortex- 
Format aufgezeichnete Copy¬ 
shop-Version auf 5,25 “Disket¬ 
te erhalten. 

Info: DMV-Verlag 

und Fachhandel □ 

Public-Domain 

Public Domain Software, die 
sich in jüngster Zeit großer 
Beliebtheit erfreut, ist eben¬ 
falls von der Fa. Maier erhält¬ 
lich. Die Firma unterhält seit 
1983 einen Public Domain- 
Service für gängige Rechner. 
Info: EDV-Syslemberatung 
Maier 

8091 Antholing □ 


Joyce- 
Software 
für Ärzte 

Das Programm Lisamed ist 
ein Liquidations-, Statistik- 
und Adressverwallungspro- 
gramm für Ärzte. Neben dem 
Bedrucken aller wichtigen 
Praxisformulare gibt es Optio¬ 
nen wie Privatliquidationser¬ 
stellung nach GOÄ, statisti¬ 
sche Auswertungen, Verwal¬ 
tung von Patientendaten u.v.m. 
Das Programm läuft auf dem 
Joyce plus mit zwei Disketten¬ 
laufwerken und kostet in der 
Minimalausführung DM 
498,-. Das Programmpaket 
mit indiv. Programmierung al¬ 
ler Daten schlägt mit DM 
990,- zu Buche. 

Info: P.u.S. Bosch 

5300 Bonn 2 □ 

M-BASIC 

Wie zu erfahren war, bietet 
Markt & Technik nun anstel¬ 
le des C-BASIC-Compilers 
den M-BASIC Interpreter und 
Compiler an (wir berichteten 
bereits in Heft 5/86). 

Info: Markt & Technik 
8013 Haar b- München □ 

Lapine card-20 
und -30 

Zwei neue Festplatten-Steck¬ 
karten werden von der Fa. 
CTT angeboten. Während die 
20MB-Steckkarte auf der Ba¬ 
sis des MFM-Kodierverfah- 
rens arbeitet, wird die Kapazi¬ 
tät von 30MB durch die Ver¬ 
wendung des RLL 2.7 Verfah¬ 
rens erreicht. 

Ein automatischer Headlifter 
verriegelt die Sehreib-/Lese- 
köpfe direkt nach Ausschalten 
des Systems, u.a. dürfte damit 
eine große Transportsicherung 
erreicht werden. 

Beide Karten sind für den 
Schneider PC erhältlich. 
Info: CTT 

8000 München 80 □ 


Für IBM- und Kompatible ist 
jetzt ein schneller Scanner er¬ 
hältlich, der das Digitalisieren 
beliebiger Abbildungen er¬ 
möglicht. So wird z.B. eine 
DIN A4-Seite in weniger als 
10 Sekunden (lt. Hersteller) 
erfaßt und in Digitalcode ver¬ 
wandelt. Per Umschalter kön¬ 
nen sowohl S/W als auch 
Farbabbildungen umgesetzt 
werden. Ergänzt wird der 
Scanner durch das Programm¬ 
paket »Eye Star«, das u.a. das 
Einfügen von digitalisierten 
Abbildungen in WordStar-Tex- 
te ermöglicht. Das Programm 
bietet ebenfalls eine Schnitt¬ 
stelle zu Grafikprogrammen 
wie z.B. GEM Paint, Pagema- 
ker etc. 

Der Preis für den AST- 
TurboScan liegt bei ca. DM 
7500,- + MWSt. 

Info: AST Research Deutschi. 
4000 Düsseldorf □ 

Farb- 

Videodigitizer 

Mit dem F.E.T Digitizer las¬ 
sen sich Farbbilder in 16 Echt¬ 
farben digitalisieren. Die Bil¬ 
der können auf Diskette ge¬ 
speichert und mit Grafik-Pro¬ 
grammen weiter verarbeitet 
werden. Erhältlich ist der 
F.E.T für den Schneider CPC 
6128 (Auflösung 160x200 Pi¬ 
xel) und kostet ca. DM 498, -. 
Info: Creative Video 
8520 Erlangen □ 

Tasword 
auch für Joyce 

Das bekannte Textprogramm 
Tasword 8000 ist nun auch für 
den Joyce erhältlich. Damit 
steht eine weitere Alternative 
zu LocoScript zur Verfügung, 
des weiteren werden auch 
Fremddrucker unterstützt. Als 
Zugabe findet man das Pro¬ 
gramm Tasprint auf der Dis¬ 
kette, die für DM 149,— mit 
Umlauten, deutschen System¬ 
meldungen und deutschem 
Handbuch geliefert wird. 
Info: Profisoft 

4500 Osnabrück □ 
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...DENN 

PLÖTZLICH 

SPAREN SIE 

BEIM 

SCHNEIDER 
PC 1512 
MIT 

FESTPLATTE 

600,- MARK 


vortex 



Die 20 MB vortex-Drivecard 

... zum Nachrüsten, macht aus Ihrem Schneide r PC 1512 
einen Computer, wie ihn Profis brauchen. Denn plötz¬ 
lich haben Sie ein Winchester-Laufwerk mit 20 MB 
Speicherkapazität für nur 1398,- Mark*. Und 
trotzdem Platz für 2 Floppy-Laufwerke. 
Außer in den Schneider PC 1512 paßt 
die vortex-Drivecard in jeden IBM und 
IBM-kompatiblen PC. Sie ist als echte Slot¬ 
karte ruck-zuck eingebaut, Slotdeckel auf, 
Drivecard einstecken, Slotdeckel zu. Paßt! 
... und ist nahtlos in das MSDOS-Betriebs- 
system eingebunden. 

Also: Sofort zum Schneider-Händler oder Info-Scheck 
an VOrteX schicken ! ‘empfohlener Verkaufspreis 


Bitte senden Sie mir weitere Informationen über Ihren 
i „Schneider PC 1512" und einen Händlernachweis. 


i 


...UND PLÖTZLICH HABEN SIE EINEN PROFI-COMPUTER 


I - 

I vortex Computersysteme GmbH - Falterstraße 51-53 7101 Flein 

1 
I 
1 


I 

I 


I 
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- Mode für 
Computer? 


Es gibt Zeitgenossen, die 
beim Wort »MIDI« an eine 
Moderichtung denken und 
sich sicherlich wundern, was 
dieses Wort in einer 
Computerzeitung zu suchen 
hat. Doch hier handelt es sich 
nicht um die Beschreibung 
der Länge eines Rockes oder 
Mantels, sondern um eine 
Abkürzung für etwas hoch 
Technisches. Mit MIDI wird 
»Music Instrument Digital 
Interface« abgekürzt. 


Seit geraumer Zeit versuchen Musiker 
auf der Bühne und im Studio, ihre elek¬ 
tronischen Musikinstrumente miteinan¬ 
der zu verbinden. Als die Synthesizer 
noch nicht so weit entwickelt waren wie 
heute, als sie nur einen Ton produzie¬ 
ren konnten und die Digitaltechnik ih¬ 
ren Siegeszug noch nicht angetreten 
hatte, war diese Koppelung relativ 
leicht. Es wurden analoge Signale über¬ 
tragen und nach der Voltzahl einzelnen 
Tönen zugeordnet (CV=Control Volta- 
ge). Benötigt wurde dann noch ein Im¬ 
puls zum Ein- und Ausschalten des To¬ 
nes (Gate), und damit war die Sache zu¬ 
nächst erledigt. 

Bei nur einer Stimme ging die Koppe¬ 
lung über diese Art auch ganz gut. Mit 
mehreren Synthesizern konnte dadurch 
mit verschiedenen Klangfarben auf ei¬ 
ner Tastatur gespielt werden. Schwie¬ 
riger wurde die Sache, als die Synthe¬ 
sizer polyphon (mehrstimmig) wurden. 
Nun mußte ein Microprozessor die 
Steuerung übernehmen, und eine Kop¬ 




T» f* P & 




pelung mit anderen Instrumenten war 
nunmehr nicht mehr so leicht möglich. 
Jeder dieser Microprozessoren wurde 
anders programmiert. Folglich mußte 
die externe Steuerung auch bei jedem 
Microprozessor anders erfolgen. Auch 
wurden dann mehr Informationen er¬ 
wartet. Durch die sogenannten pro¬ 
grammierbaren Synthesizer standen 
plötzlich eine Vielzahl von Einstellun¬ 
gen des Instruments auf Abruf aus ei¬ 
nem Speicher zur Verfügung. Bei einer 
Ansteuerung von Außen mußten jetzt 
also nicht nur der Ton und seine Län¬ 
ge übergeben werden, sondern auch 
noch die zu verwendende Klangfarben¬ 
nummer. Dazu kamen aber auch noch 


herstellerspezifische Fähigkeiten, die 
der eingebaute Microcomputer auch 
noch verarbeiten mußte. Oft war es da¬ 
durch nicht mehr möglich, selbst die 
Geräte des gleichen Herstellers mitein¬ 
ander zu koppeln. 


Aus der Traum 

vom integrierten Musiksystem? 

Schon 1981 kam die Industrie auf die 
Idee, eine Norm für eine gemeinsame 
Schnittstelle zu entwickeln. 1982 gaben 
die japanischen Firmen Roland, Yama¬ 
ha, Kawai und Korg sowie der amerika¬ 
nische Synthesizerhersteller Sequential 
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Etwas Technik 


Circuits die Beschreibung von MIDI 
1.0 heraus. Eine neue Norm, aber auch 
ein neuer Star war geboren. Den Er¬ 
folg, den MIDI in den letzten Jahren 
verbuchen konnte, haben sicherlich 
nicht einmal seine Erfinder vorausse¬ 
hen können: Mittlerweile wird kein 
neuer Synthesizer mehr ohne MIDI an- 
geboten, für die gängigen Computer 
gibt es MIDI-Interfaces, selbst Studio- 
und Bühnenperipherie wie Hallgeräte 
und Verstärker werden mit MIDI aus¬ 
gerüstet. Es gibt eine Vielzahl speziel¬ 
ler MIDI-Steuergeräte und über die 
Einhaltung der Norm wacht sogar ein 
internationales Schiedsgericht, die 
IMA (International MIDI Association). 


Kommen wir zunächst einmal zur tech¬ 
nischen Beschreibung von MIDI. 
MIDI ist ein standardisiertes Interface 
zur Übertragung von Daten. Es lag bei 
der Gestaltung natürlich nahe, auf eine 
bestehende Norm zurückzugreifen. 
Um mit einem möglichst einfachen Ka¬ 
bel als Verbinder auszukommen, bot 
sich ein serielles Übertragungsformat 
an. Man hat auf das RS 232-Format zu¬ 
rückgegriffen. Das hatte nur den einen 
Nachteil: es war zu langsam. Man 
wählte daher eine höhere Baudrate von 
31,25 Kilobaud (diese Zahl erhält man 
durch Teilen des Systemtaktes von 2 
MHz durch 64). Das Datenformat blieb 
annähernd gleich zu RS 232: mit einem 
Start- und einem Stopbit und dazwi¬ 
schen acht Datenbits. Bevor wir uns ge¬ 
nauer anschauen, was alles übertragen 
werden kann, sollte noch ein kurzer 
Blick auf die Technik, die Bauelemen¬ 
te, gerichtet werden. 

Damit ein Microprozessor die seriellen 
Daten verstehen kann, müssen sie in ein 
paralleles Format umgesetzt werden. 
Meist wird dafür der 6850 verwendet. 
Die Daten werden mit einer 5 mA- 
Stromschleife gesendet, wobei logisch 
0 Strom ein bedeutet. Als Anschluß 
dient eine 5polige DIN-Buchse. Die 
Datenleitungen sind um 180 Grad zu¬ 
einander auf Pin 4 und Pin 5 angeord¬ 
net. Pin 1 und Pin 2 bleiben unbelegt. 
Pin 3 ist üblicherweise die Masse. Im 
Empfänger treffen die Daten auf einen 
Optokoppler. Dadurch werden die ver¬ 
bundenen Geräte galvanisch getrennt. 
Das verhindert eine Brummschleife. 
Von dem Optokoppler werden sie an 
den UART (Universal Asynchronous 
Receiver Transmitter) — wie gesagt 
meist ein 6850 - übergeben. Der 
UART ist gewissermaßen das Verbin¬ 
dungsglied zwischen den MIDI- 
Schnittstellen und der Elektronik des 
Synthesizers. 

Es gibt drei verschiedene Anschluß¬ 
buchsen: zunächst einmal die MIDI- 
Out-Buchse zum Senden der Daten und 
die MIDI-In zum Empfangen. Da jeder 
Sender nur einen Empfänger ansteuem 
kann, ist auch noch eine MIDI-Thru- 
Buchse notwendig, durch die empfan¬ 
gene Daten weitergereicht werden. Ei¬ 


nen typischen Aufbau der MIDI- 
Hardware zeigt Abbildung 1. Als Ver¬ 
bindungskabel wird verdrillte, abge¬ 
schirmte Leitung verwendet. Die Ab¬ 
schirmung ist an beiden Seiten ange¬ 
schlossen. Die Kabel dürfen maximal 
15 Meter lang sein. Meistens werden 
DIN-Kabel, wie sie auch bei einer Ste¬ 
reoanlage zu finden sind, eingesetzt. 
Wird ein Computer in einem MIDI- 
System eingesetzt (was er da machen 
kann und wie das geht, darauf gehen 
wir später ein), muß er die MIDI-Daten 
auch verstehen und senden können. 
Viele Computer besitzen entweder 
standardmäßig oder nachrüstbar eine 
RS 232-Schnittstelle. Jedoch reicht die 
Geschwindigkeit dieses Interfaces in 
der Regel nicht aus, da es maximal eine 
Baudrate von 19,2 kBaud erreicht und 
meist noch nicht einmal die. Es wurde 
also ein spezielles MIDI-Interface be¬ 
nötigt. Für die meisten Computer (auch 
für die Schneider CPCs) gibt es mittler¬ 
weile ein MIDI-Interface. 


Das Datenformat 

Kommen wir nun zum Format der 
übertragenen Daten. Es werden acht Bit 
(ohne Start- und Stoppbit) gesendet, das 
heißt, es können 256 Bytes unterschie¬ 
den werden. Ist das achte Bit gesetzt 
(MSB/1), handelt es sich um ein Status¬ 
byte. Es kann deshalb insgesamt 128 
Statusbytes geben, jedes steht für einen 
MIDI-Befehl. Ist das achte Bit nicht ge¬ 
setzt (MSB/0), handelt es sich um ein 
Datenbyte. Auch hier können nun 128 
verschiedene Datenbytes gesendet wer¬ 
den. In der Regel handelt es sich bei 
den Datenbytes um Noten. 128 ver¬ 
schiedene Töne unterscheiden zu kön¬ 
nen, reicht vollkommen aus; da jede 
Oktave 12 Töne umfaßt, können also 
zehn Oktaven dargestellt werden. Am 
interessantesten sind sicherlich die Sta¬ 
tusbytes. Hier gibt es wiederum zwei 
Gruppen: die Kanal-Kommandos und 
die Systemkommandos. 

Schauen wir uns zunächst die Kanal- 
Kommandos an. MIDI kann 16 Kanä¬ 
le unterscheiden. Dafür werden 4 Bit 
des Bytes benötigt. Da das achte Bit bei 
einem Statusbyte immer gesetzt ist und 
Bit eins bis vier zur Kanalunterschei¬ 
dung gebraucht werden, bleiben zur 
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Status 

Anzahl dar Datenbytes 

Erläuterungen 


Kanal 

-Nachrichten 



100® 

nnnn 

2 

NOTE AUS 


1001 

nnnn 

2 

NOTE EIN 


1010 

nnnn 

2 

After touch polyphon 


1011 

nnnn 

2 

Änderung der Steuer-Anweisung 

1100 

nnnn 

1 

Änderung des Programms 


1101 

nnnn 

1 

after touch 


1110 

nnnn 

2 

Pitch Wheel 


1011 

nnnn 

2 

ICa nalmodus 


System-Nachrichten 



1111 

0000 

beiiebig 

System exclusiv 


1111 

0SSS 

0 bis 2 

System gemeinsam 


1111 

lttt 

0 

Echtzeit 


Erlttuterungen: 




nnnn 


Kanalnumraer, wobei 0000 Kanal 1, 0001 Kanal 2, 

.. 1111 



Kanal 16 entspricht 



sss 


eine der sieben System 

gemeinsamen Nachrichten 


ttt 


eine der acht Echtzeit- 

Meldungen 


Tabelle 1: Die 

MIDI-Status-Eytss 





Abbildung!- Oie MIDI-Hardw ore 


Befehlsunterscheidung nunmehr drei 
Bits übrig. Tabelle 1 gibt eine Übersicht 
über die Kanal-Kommandos. Jedem 
dieser Befehle folgen ein oder mehre¬ 
re Datenbytes. Bilden wir doch einmal 
ein einfaches Beispiel. Senden wir eine 
Note an einen Synthesizer beziehungs¬ 
weise einen Expander (das ist ein Syn¬ 
thesizer ohne Tastatur, also nur über 
MIDI spielbar). Als erstes müssen wir 
den Befehl »Note ein« und dann das 
Byte für die Tonhöhe senden. Es wird 
aber noch ein weiteres Byte für die 
Lautstärke der Note benötigt. Der Mu¬ 
siker nennt diese Lautstärkenunter¬ 
scheidung »Anschlagsdynamik«. Sen¬ 
den wir die Note C auf Kanal 1 mit 
mittlerer Lautstärke (mf). Dann müs¬ 
sen folgende Bytes gesendet werden: 

1) 10010000 Statusbyte für Note ein auf 
Kanal 1 (0000) 

2) 0011 0000 Datenbyte für Note C in 
der dritten Oktave 

3) 0100 1000 Datenbyte für Anschlags- 
dymanik mf 

Nun klingt der Ton solange, bis er wie¬ 
der über MIDI abgeschaltet wird. Dazu 
werden zum richtigen Zeitpunkt wieder 
3 Bytes gesendet: Note aus, Note, Ab¬ 
klingzeit (Release Rate). Für unser Bei¬ 
spiel sähe das folgendermaßem aus: 

1) 1000 0000 Note aus auf Kanal 1 

2) 0011 0000 Note C in der dritten 
Oktave 

3) 0100 1000 Release Rate 

Wir sehen: Die Datenbytes hinter Note 
ein und Note aus ähneln sich. Die aus¬ 
gewählte Note ist bei beiden Befehlen 
gleich. Weil über MIDI mehrere Noten 
fast gleichzeitig gesendet und empfan¬ 
gen werden können und die Synthesi¬ 
zer mehrere Töne gleichzeitig spielen 
können, ist es dringend erforderlich 
mitzuteilen, welcher Ton abgeschaltet 
werden soll. Das zweite Datenbyte ist 
zwar auch identisch zur Befehlsfolge 
von »Note ein«, hat aber eine andere 
Funktion und damit auch einen anderen 
logischen Inhalt. In analoger Weise 
können auch noch andere Informatio¬ 
nen wie beispielsweise eine Änderung 
des Modulationsrades oder auch der 
Wechsel eines Klangs per MIDI über¬ 
tragen werden. Bei einem angeschlos¬ 
senen Drumcomputer kann auch der 
Song gewählt und geändert werden. 
Neben den Kanal-Kommandos gibt es 
auch noch Systemnachrichten, sie tei¬ 


len sich in drei Gruppen. Zunächst sind 
da die System-Exclusiv-Nachrichten. 
Damit können Besonderheiten einzel¬ 
ner Hersteller angesteuert werden. Je¬ 
der Hersteller erhält eine Identifika¬ 
tionsnummer, über die das System er¬ 
kennen kann, ob es die empfangene In¬ 
formation verarbeiten kann. Die zweite 
Gruppe der System-Informationen sen¬ 
det Echtzeit-Nachrichten. Damit kann 
eine Synchronisation mit einem Drum¬ 
computer und/oder einem Tonband er¬ 
folgen. Die dritte Gruppe sind system¬ 
gemeinsame Nachrichten. Damit kann 
zum Beispiel die Stimmung eines 
MIDI-Systems geändert werden. Es 
kann aber auch übergeben werden, an 
welcher Stelle in einem Programma¬ 
blauf man sich derzeit befindet. Hier 
wird auch festgelegt, was nach einem 
Start-Befehl erfolgen soll. 


Da für uns die Kanal-Kommandos 
wichtiger sind, belassen wir es bei die¬ 
sen Bemerkungen zu den Systemnach¬ 
richten. Wir haben bereits festgestellt, 
daß MIDI 16 Kanäle verwalten kann. 
Für die empfangenden Geräte sieht die 
Norm drei verschiedene Modi vor, die 
recht interessant sind: Omni-Mode, 
Poly-Mode und Mono-Mode. 


MIDI-Modi 

Der Omni-Mode kann jeweils gemein¬ 
sam entweder mit dem Mono- oder 
dem Poly-Mode Vorkommen. Der 
Omni-Mode regelt, ob ein Empfänger 
die Daten zuordnen oder alle Signale 
verarbeiten soll. Im Klartext bedeutet 
das: Wenn Onmi eingeschaltet ist, rea- 
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giert der empfangene Synthesizer auf 
jedes Signal. Er ignoriert sozusagen die 
Kanalnummer und geht davon aus, daß 
jede empfangene Information für ihn 
bestimmt ist. Ist dagegen Omni ausge¬ 
schaltet, unterscheidet der Empfänger 
zwischen den verschiedenen Kanälen 
und sucht sich nur die für ihn bestimm¬ 
ten Daten heraus. Durch die Kombina¬ 
tion mit Mono- oder Poly-Mode erge¬ 
ben sich folgende vier Möglichkeiten: 

- Omni-on/Poly: Hier empfängt das 
Gerät über alle 16 Kanäle Informatio¬ 
nen und ist in der Lage, diese polyphon 
(das heißt mehrere auf einmal) zu ver¬ 
arbeiten. Ein sechsstimmiger Synthe¬ 
sizer kann also sechs Töne via MIDI 
spielen. Würden alle an ein MIDI-Netz 
angeschlossenen Geräte in dieser Kom¬ 
bination betrieben, so wäre ein geziel¬ 
tes Ansprechen einzelner Bausteine 
nicht möglich. 

— Onmi-on/Mono: Diese Kombina¬ 
tion ist wenig sinnvoll. Sie wäre der 
oben besprochenen sehr ähnlich; aller¬ 
dings könnte jedes Gerät nur eine Infor¬ 
mation verarbeiten. Ein polyphoner 


(mehrstimmiger) Synthesizer wäre 
plötzlich einstimmig (monophon). 

- Omni-off/Poly: Diese Betriebsart ist 
heute bei den meisten Geräten üblich. 
Jedes Gerät kann über eine Kanalnum¬ 
mer speziell angesprochen werden und 
mehrere Daten gleichzeitig verarbeiten. 
Man kann also verschiedene polypho¬ 
ne Synthesizer separat mehrstimmig 
ansteuem. 

— Omni-off/Mono: Diese Kombina¬ 
tion ist die mächtigste Betriebsart. Sie 
ist leider noch kein Standard, hat aber 
gerade in der letzten Zeit eine größere 
Verbreitung erfahren. Hier bleiben ei¬ 
gentlich keine Wünsche mehr offen. Es 
ist nicht nur möglich, verschiedene Ge¬ 
räte über unterschiedliche Kanäle anzu- 
steuem; auch den einzelnen Stimmen in 
diesen Geräten können Kanalnummern 
zugeordnet werden. So kann man schon 
mit einem Synthesizer mehrere Klang¬ 
farben gleichzeitig erzeugen. Es wäre 
denkbar, daß beispielsweise auf Kanal 
1 der Baß (einstimmig), auf Kanal 2 bis 
4 eine dreistimmige Klavierbegleitung 
und auf Kanal 5 die Melodie für Strei- 



Abbildung2 - Parallelschaltung 


[midithru 




MIDI IN 


MIDI OUT 



Abbildung B:MIDI THRU im MIDI - Verbuid 



Abbildung4-. Expander-Einsatz 


eher gesendet werden. Brauchte man 
im Poly-Modus dafür drei verschiede¬ 
ne Synthesizer, kann man hier mit nur 
einem zurechtkommen. Man muß al¬ 
lerdings daran denken: Jeder Ton, der 
gleichzeitig zu einem anderen gespielt 
werden soll, erfordert einen eigenen 
Kanal, und da sind 16 Kanäle schnell 
belegt. Dann wird MIDI wohl bald zu 
eng. Aber man kann sich auch hier hel¬ 
fen. Betreibt man beispielsweise für un¬ 
sere oben beschriebene Anforderung 
zwei Synthesizer, könnte der zweite die 
dreistimmige Begleitung im Poly-Mode 
auf einem Kanal spielen, während der 
erste weiterhin Baß und Melodie er¬ 
zeugt. Dadurch werden wieder zwei 
Kanäle für andere Zwecke frei. 

Nun sind wir schon fast mittendrin in 
der Erörterung der Frage: Was kan man 
denn nun mit MIDI eigentlich machen, 
und wie würde ein solcher Aufbau aus- 
sehen? Beginnen wir doch erst einmal 
damit zu klären, woher denn nun die 
Daten für MIDI kommen können. 


MIDI Praxis 

Wir hatten es bereits gesagt, ein Syn¬ 
thesizer besitzt in der Regel drei An¬ 
schlußbuchsen: MIDI-In, MIDI-Out 
und MIDI-Thru. Wenn wir nun zwei 
Synthesizer miteinander koppeln, wie 
es Abbildung 2 zeigt, kann von jeder 
der beiden Tastaturen jeder Synthesizer 
einzeln oder auch gemeinsam gespielt 
werden. Wir müssen aber beachten, 
daß durch MIDI die Fähigkeiten eines 
Gerätes nicht verbessert werden. Han¬ 
delt es sich bei den beiden Synthesizern 
um jeweüs einen acht- und einen sechs¬ 
stimmigen, können zwar mit dem acht¬ 
stimmigen auch acht Töne gleichzeitig 
gesendet werden, der andere kann aber 
nur sechs insgesamt spielen. Die Gren¬ 
ze der Leistungsfähigkeit wird durch 
die angeschlossenen Geräte und nicht 
durch MIDI gesetzt. Den Einsatz der 
MIDI-Thru-Buchse verdeutlicht Abbil¬ 
dung 3. Hier wurde an den zweiten 
»Synthi« noch ein dritter angehängt, der 
aber keine Daten sendet, sondern nur 
empfängt. Das ist bei einem Modul¬ 
synthesizer beziehungsweise Expander 
(ohne Tastatur) eine sinnvolle Lösung. 
Bleiben wir bei den Modulsynthesi- 
zem. Wer vor einigen Jahren aufmerk- 
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Abbildung5:MIDi und Computer 


sam Konzerte beobachtet hat, bei denen 
Synthesizer eingesetzt wurden, konn¬ 
te feststellen, daß der Keyboarder (so 
wird der Musiker, der auf Synthesizern 
spielt, im Fachjargon genannt), von ei¬ 
ner Vielzahl von Tastaturen und Gerä¬ 
ten umgeben war. Mit MIDI kann man 
so etwas besser lösen. Heute gibt es Ge¬ 
räte, die nur eine Tastatur und einen 
MIDI-Ausgang besitzen (sogenannte 
Masterkeyboards) und über MIDI ex¬ 
terne Module, die den Ton erzeugen, 
ansteuem. Die Masterkeyboards sind 
so gebaut, daß man auf verschiedenen 
Tastaturteilen unterschiedliche Module 
anspricht. Man kann auch vom Master¬ 
keyboard über MIDI-Informationen die 
Einstellung der Module ändern. Wie so 
ein Aufbau aussehen könnte, zeigt Ab¬ 
bildung 4. 


Der Computer 
in einem MIDI-System 

Nach dem bisher Gesagten liegt es ei¬ 
gentlich schon auf der Hand: Auch ein 
Computer kann über ein geeignetes 
MIDI-Interface MIDI-Daten senden 
und so einen oder mehrere Synthesizer 
steuern. Wie ein solches System ausse¬ 
hen könnte, zeigt Abbildung 5. Hier 
werden ein Synthesizer und zwei Mo¬ 
dule von einem Computer über ein In¬ 
terface gesteuert. 

Doch welche Aufgaben kann ein Com¬ 
puter hier erfüllen? Die gängigste und 
wohl einsichtigste Aufgabe haben wir 
eigentlich schon beschrieben: die 
Funktion als Sequenzer. Über eine Ta¬ 
statur können Tonfolgen gespielt wer¬ 
den, die sich der Computer merkt (auf 


Diskette oder im Speicher). Er kann 
diese Sequenz dann wieder über MIDI 
abspielen, so daß das vorher Gespiel¬ 
te nun wieder genauso zu hören ist. 
Spielt man mehrere Sequenzen hinter¬ 
einander ein und ordnet sie anderen Ka¬ 
nalnummern zu, lassen sich Studioauf¬ 
nahmen leicht vorprogrammieren. Es 
wird sogar möglich, mit relativ einfa¬ 
chen Mitteln Musik zu Hause aufzu¬ 
nehmen. Homerecording wird das ge¬ 
nannt und ist durch MIDI eigentlich 
erst möglich geworden. So können Stu¬ 
diozeiten gespart werden oder sogar 
ganz vermieden werden, wenn nur 
elektronische Klänge aus einem Synt¬ 
hesizer aufgenommen werden sollen. 
Kommen Naturinstrumente oder Ge¬ 
sang dazu, müssen diese im Studio bei¬ 
gemischt werden. Aber trotzdem wur¬ 
de bereits ein großer Teil der Arbeit zu 
Hause geleistet und Studiozeit gespart. 
Was man alles mit einem Computer 
machen kann, hängt aber nur von der 
Software ab. 


Auf die Software 
kommt es an 

Der Computer kann natürlich wesent¬ 
lich mehr als oben angedeutet. Ein Mu¬ 
siker, der eine Sequenz einspielt, wird 
das nicht so exakt können, wie es der 
Computer gerne hätte. Es stellt sich nun 
die Frage, ob der Rechner die kleinen 
zeitlichen Abweichungen vom richtigen 
Takt ausgleichen oder sich einfach das 
(nicht ganz korrekt) Eingespielte unver¬ 
ändert merken soll. Die meisten Se¬ 
quenzerprogramme können beides. Ist 


ein Musikteil eingespielt, kann man ihn 
quantisieren. Das ist der zeitliche Aus¬ 
gleich von leichten Fehlem. Eine Vier¬ 
telnote würde dann beispielsweise vom 
Computer exakt auf den Taktschlag ge¬ 
setzt. Wem das zu statisch ist und wer 
die menschlichen Abweichungen ger¬ 
ne in Kauf nimmt, der kann darauf na¬ 
türlich verzichten; aber für Perfektio- 
nisten ist das bestimmt ein gutes Mit¬ 
tel, um den eigenen Ansprüchen ge¬ 
recht zu werden. 

Darüber, daß man einzelne Sequenzen 
nacheinander einspielen kann, ist schon 
gesprochen worden. Meistens bieten 
die Sequenzerprogramme mehrere 
Spuren an - oft 12 oder sogar 16. Jeder 
dieser Spuren wird ein MIDI-Kanal zu¬ 
geordnet. Nun kann man mehrere 
Stimmen mit unterschiedlichen Klang¬ 
farben programmieren (nacheinander 
einspielen) und gleichzeitig abspielen 
lassen. Damit auch noch ein Rhyth¬ 
musgerät parallel laufen kann, wird 
meist der Systemtakt über eine beson¬ 
dere Anschlußbuchse am MIDI- 
Interface des Computers ausgegeben. 
Bei MIDI werden pro Taktzeit 24 
Clock-Signale gesendet. Dadurch ist 
eine exakte Synchronisation möglich. 

Sequenzen sind für einen Computer 
nichts anderes als gespeicherte Daten. 
Er kann sie daher auch ähnlich den Da¬ 
ten in einer Datenbank (Adressverwal- 
tung) weiterverarbeiten. Die Möglich¬ 
keit zur nachträglichen Veränderung 
des Gespielten und der Verkettung von 
Sequenzen sollte deshalb für ein gutes 
Programm selbstverständlich sein. Stel¬ 
len wir uns einmal vor, ein Musiker 
spielt bei der »Aufnahme« einer Se¬ 
quenz einen falschen Ton. Wenn das 
Programm nachträgliche Korrekturen 
zuläßt, ist es leicht, den Fehler zu ver¬ 
bessern; wenn nicht, muß der ganze 
Part noch einmal gespielt werden — 
und das solange, bis er einmal vollkom¬ 
men fehlerfrei eingespielt wurde. Da 
sind dann Editiermöglichkeiten schon 
hilfreich, jedoch bei vielen Sequenzer¬ 
programmen nicht selbstverständlich. 

Über Synchronisation eines Drumcom¬ 
puters haben wir bereits gesprochen. Es 
ist aber auch möglich, ein Tonbandge¬ 
rät über MIDI zu synchronisieren. Hier 
gibt es jedoch verschiedene Synchroni¬ 
sationsarten, die nicht mit MIDI kom- 
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patibel sind. Aber MIDI kann diese 
Clocksignale senden, wenn ein Sequen¬ 
zerprogramm richtig programmiert 
wurde. Es ist wahrscheinlich schon viel 
verlangt, wenn man das in jedem Pro¬ 
gramm erwartet, aber eines, das für 
professionelle Ansprüche geschrieben 
wurde (Einsatz im Studio), kann ohne 
diese Möglichkeit nicht auskommen. 
Es gibt allerdings mittlerweile Zusatz¬ 
geräte, die MIDI und Tape synchroni¬ 
sieren. Sogar Drumcomputer ohne 
MIDI und Synthesizer mit anderen 
Schnittstellen (CV und Gate) können 
über Synchronisationsboxen via MIDI 
angesteuert werden. 

Wir haben es bereits gesagt: Eine ge¬ 
speicherte Sequenz ist für einen Com¬ 
puter lediglich ein Datensatz, der auch 
weiterverarbeitet werden kann. Die in¬ 
teressanteste Verarbeitung ist der Druck 
von Noten. Mit einem entsprechenden 
Programm ist der Computer in der 
Lage, die über MIDI eingespielte Se¬ 
quenz in Notenschrift umzusetzten und 
auszudrucken. Das hört sich relativ 
leicht an, ist es aber nicht. Notenschrift 
ist keineswegs eindeutig. Töne gleicher 
Länge lassen sich unterschiedlich dar¬ 
stellen. Man kann beispielsweise No¬ 
ten anbinden oder mit einem Punkt ver¬ 
sehen. Je nachdem, auf welcher Takt¬ 
zeit sich die Note befindet, wird die 
eine oder andere Art gewählt, um das 
Ergebnis übersichtlich und leicht lesbar 
zu gestalten. Ein Computer hat damit 
allerdings erhebliche Schwierigkeiten. 
Über Parameter kann aber meist ein 
Kompromiß eingestellt werden. 

Ein weiteres Problem ist die oben be¬ 
reits angesprochene Unexaktheit beim 
Einspielen. Ein Notendruckprogramm 
muß quantisieren, die Frage ist nur, 
wieviel. Auch hier muß ein Kompro¬ 
miß gewählt werden. Aber trotzdem ist 
der Notendruck sehr interessant. Ein 
Arrangeur oder Komponist braucht nun 
nicht mehr mühsam die auf einem Kla¬ 
vier ausprobierten Notenparts auf Pa¬ 
pier zu notieren. Er braucht sie ledig¬ 
lich über eine Tastatur in einen Compu¬ 
ter zu spielen und ausdrucken zu las¬ 
sen. Das geht leichter und schneller als 
vorher. Er wird dadurch in die Lage 
versetzt, mehr als vorher auszuprobie¬ 
ren, wie ein Arrangement gestaltet wer¬ 
den sollte. Mit mehreren angeschlosse¬ 
nen Synthesizern und einem entspre¬ 


chenden Sequenzerprogramm kann er 
sich sein Arrangement erst einmal an¬ 
hören und sich dann vom Notendruck¬ 
programm die Partitur ausdrucken las¬ 
sen. Da manche Instrumente eine ande¬ 
re Tonlage haben als andere, müssen 
unter Umständen für diese Instrumente 
die Noten in eine andere Tonart trans¬ 
poniert werden. Auch das kann ein No¬ 
tendruckprogramm selbständig erledi¬ 
gen. Also: eine wertvolle Hilfe für alle 
Notenschreiber. Leider gibt es diese 
Programme nicht für jeden Computer 
— und wenn es sie gibt, sind sie meist 
recht teuer. Das kommt daher, weil die¬ 
se Programme nur für den professionel¬ 
len Einsatz geschrieben wurden und ei¬ 
gentlich nicht für den Hobby-Anwender 
gedacht sind. 


Der Computer 
als Bühnenhilfsmittel 

Nicht nur zu Hause oder im Studio ist 
der Computer ein Hilfsmittel, sondern 
auch und besonders auf der Bühne im 
Live-Einsatz. Die heutigen Arrange¬ 
ments sind oft so komplex (da sie im 
Studio von Computern gespielt wer¬ 
den), daß sie auf der Bühne von einem 
Keyboarder oft nicht mehr nachgespielt 
werden können. Es ist daher meistens 
notwendig, auch auf der Bühne den 
Computer als Sequenzer einzusetzen. 
Das hat im Vergleich zum Studio aber 
einen Nachteil. Auf der Bühne gibt es 
meistens einen Schlagzeuger. Da der 
aber ein Mensch ist und nicht so genau 


trommelt, wie ein Computer spielt, 
kann es Probleme geben. Meist wird 
sich dann so geholfen, daß der Drum¬ 
mer einen Kopfhörer aufsetzt, über den 
er das Metronom (den Taktschlag) des 
Computers hören kann. Darüber freut 
sich aber kein Schlagzeuger, denn wer 
hört schon gerne während eines gesam¬ 
ten Auftritts dauernd ein Ticken im 
Ohr? Aber leider geht das wohl nicht 
mehr anders. Also: Auch auf der Bühne 
kann und muß der Computer als Se¬ 
quenzer in einem MIDI-System ver¬ 
wendet werden. Er kann aber auch hier 
noch andere Funktionen erfüllen. 

Wir haben bereits die Masterkeyboards 
angesprochen. Gerade auf der Bühne 
ist ein solches Masterkeyboard von un¬ 
schätzbarem Wert. Meistens haben 
aber die Musiker bereits einen Synthe¬ 
sizer mit Tastatur und daneben einige 
Expander (Modulsynthesizer). Schön 
wäre es, wenn der Synthesizer mit der 
Tastatur die Funktion eines Masterkey¬ 
boards erfüllen könnte. Schaltet man ei¬ 
nen Computer in das MIDI-System ein, 
ist das auch leicht möglich. Der Aufbau 
wäre etwa so, wie in Abbildung 5 dar¬ 
gestellt. Mit der Tastatur wird der 
Computer angesteuert. Dieser kann 
nun entscheiden, auf welchem Kanal er 
das Signal weitergeben soll. Dadurch 
ist es möglich, auf unterschiedlichen 
Tastaturbereichen unterschiedliche Ex¬ 
pander oder Synthesizer zu spielen. 
Man muß darauf achten, daß der Syn¬ 
thesizer, auf dem gespielt wird, nicht 
sofort die Töne selbst produziert. Vie- 
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le neue Geräte haben dafür die Funk¬ 
tion Local. Ist Local ausgeschaltet, 
spielt das Tonerzeugungsteil des Synt¬ 
hesizers nur noch die Töne, die es über 
MIDI empfängt. Der Impuls der Tasta¬ 
tur wird nur über MIDI gesendet und 
im Gerät selbst ignoriert. Dadurch ist 
der Computer in der Lage, den Impuls 
gezielt zurückzusenden. Ein Computer 
kann also relativ einfach aus einem ein¬ 
fachen Synthesizer ein Masterkeyboard 
machen. Eine Besonderheit sollte ein 
solches Programm noch bieten: Es soll¬ 
te ohne Monitor bedienbar sein, damit 
nicht immer der Büdschirm mit auf die 
Bühne genommen werden muß. Das ist 
sogar bei den Schneiders möglich, 
wenn man sich ein externes Netzteil zu¬ 
legt. 


MIDI auf dem Schneider 

Bleiben wir bei den Schneider- 
Computern. Gibt es überhaupt MIDI 
für Schneider? Bis vor einiger Zeit wur¬ 
den die Besitzer eines CPCs auf diesem 
Gebiet arg vernachlässigt. Nunmehr 
gibt es aber - von einem englischen 
Anbieter — auch ein MIDI-Interface 
für den CPC. Es handelt sich um ein 
Modul, das am Floppyport (zusätzlich 
zum Disk-Laufwerk) angesteckt wird. 
Als Anschlüsse finden sich MIDI-In, 
zweimal MIDI-Out und MIDI-CIock 
zur Synchronisation. Nur zwei MIDI- 
Out-Buchsen ist sicherlich etwas we¬ 
nig, aber es gibt als MIDI-Zubehör so¬ 
genannte MIDI-Thru-Boxen, die einen 
Eingang auf vier Ausgänge schicken. 
Damit können fehlende MIDI-Out- 
Anschlüsse am Interface ersetzt 
werden. 

Bisher gibt es für das MIDI-Interface 
zum Schneider CPC nur ein Pro¬ 
gramm, das direkt mit dem Modul mit¬ 
geliefert wird. Es ist ein Sequenzerpro¬ 
gramm mit acht Kanälen. Wir haben 
das MIDI-Interface und dieses Pro¬ 
gramm bereits in einer früheren Ausga¬ 
be vorgestellt, deshalb wollen wir hier 
nicht näher darauf eingehen. Wer sich 
dafür interessiert, kann einen kleinen 
Einblick durch Abbildung 6 erhalten. 
Diese Abbildung gibt den Bildschirm 
des Sequenzerprogrammes mit Erläu¬ 
terungen wieder. 

Vernachlässigt werden bisher noch die 


Besitzer eines Joyce. Uns ist kein Inter¬ 
face für diesen Computer bekannt. Ver¬ 
mutlich wird es auch keines geben, da 
der Joyce als Büro- und Schreibcompu¬ 
ter ausgelegt ist und sicherlich nicht da¬ 
mit gerechnet werden kann, daß viele 
Joyce-Besitzer ein MIDI-Interface be¬ 
nötigen. Besser sieht es beim neuen PC 
aus. Dieser Computer ist IBM-PC- 
kompatibel. Und für den IBM gibt es 
etliches an Hard- und Software aus dem 
MIDI-Bereich. Der PC war einer der 
ersten Computer, der für MIDI einge¬ 
setzt wurde, und deshalb gibt es genü¬ 
gend Studioprogramme. Diese sind 
aber für den professionellen Einsatz ge¬ 
dacht und daher auch recht teuer. Viel¬ 
leicht ändert sich das nun, da durch die 
große Verbreitung kompatibler Com¬ 
puter (nicht nur Schneider) der poten¬ 
tielle Anwenderkreis für PC-MIDI 
wächst. Es sollte noch hinzugefügt wer¬ 
den, daß der PC im professionellen Be¬ 
reich für MIDI-Systeme mittlerweile 
kaum noch eine Bedeutung hat. Dort 
werden heute Computer mit einem 
32-Bit-Prozessor eingesetzt, die bereits 
in ihrem Design auf MIDI zugeschnit¬ 
ten sind. 


MIDI-Probleme 

Bisher haben wir die großartigen Mög¬ 
lichkeiten von MIDI beschrieben und 
seinen Einsatz erläutert. Aber wie al¬ 
les auf der Welt gibt es auch mit MIDI 
einige Probleme. Als erstes wäre da der 
Zeitfaktor zu nennen. Die Übertra¬ 
gungsrate von 31,25 kBaud klingt zwar 
sehr hoch und reicht auch vollkommen 
aus, wenn nur zwei oder drei Instru¬ 
mente gekoppelt werden. Ohne MIDI- 
Thru-Box müßte jedes weitere Instru¬ 
ment mit der MIDI-Thru-Buchse eines 
der anderen angesteuert werden. Nach 
einigen hintereinandergeschalteten Ge¬ 
räten ist der Zeitunterschied schon 
deutlich zu hören. Und maximal 16 Ka¬ 
näle sollte MIDI beherrschen. Aber 
auch bei nur wenigen angesteuerten 
Einheiten wird der Zeitfaktor zum Pro¬ 
blem, wenn große Datenmengen, etwa 
je ein vierstimmiger Akkord auf fünf 
Kanälen, gesendet werden. Da wird 
dann ein leichter Verzögerungseffekt 
bereits hörbar. Dieses Problem wäre 
nur mit einer höheren Baudrate oder ei¬ 


ner parallelen Datenübertragung zu be¬ 
seitigen. Es gibt aber auch noch einige 
Unverträglichkeiten von Instrumenten 
untereinander. Zum einen halten sich 
nicht alle Hersteller genau an die 
MIDI-Norm. Das fangt bei größeren 
Toleranzen im MIDI-CIock-Signal an 
(dadurch wird die Synchronisation pro¬ 
blematisch) und hört vorerst damit auf, 
daß nicht alle MIDI-Daten übertragen 
werden. Beispielsweise gibt es Key¬ 
boards, die nur auf einem einzigen Ka¬ 
nal laufen. Andere können nur MIDI- 
Daten senden, oder es werden nur 
Tastatur-Informationen verarbeitet. 
Das ist allerdings keine Kritik am 
MIDI-Standard, denn wenn sich alle 
Hersteller genau daran hielten und auch 
die Möglichkeiten ausschöpften, wären 
diese Probleme beseitigt. 

Ein Problem, das in der Norm angelegt 
ist, sind Ungenauigkeiten in der Defi¬ 
nition. Es gibt beispielsweise das Sig¬ 
nal Controller. Das ist nicht näher be¬ 
schrieben, und so geschieht bei jedem 
angeschlossenen Synthesizer etwas an¬ 
deres, wenn dieses Signal ankommt. So 
wird die Norm ausgehöhlt bis hin zur 
Unbrauchbarkeit. 


Fazit 

Trotz der beschriebenen Probleme ist 
MIDI eine recht interessante Geschich¬ 
te. Besonders für Homecomputer- 
Enthusiasten bietet sich hier ein neues 
Betätigungsfeld: Computermusik und 
Homerecording. Auch ohne Fingerfer¬ 
tigkeit und ohne langes Üben kann man 
durch MIDI seine musikalische Krea¬ 
tivität voll ausspielen. Bühnen- und 
Studiomusiker können heute auf diesen 
Standard nicht mehr verzichten. Für 
den Hobbyisten bietet er eine einfache 
Möglichkeit für komplexe Klänge und 
Melodien. Bleibt zu hoffen, daß der 
Standard weiterentwickelt wird und 
sich die Hersteller dazu durchringen, 
diesen Standard auch korrekt einzuhal¬ 
ten. Für die Anwender eines Schneiders 
bleibt immer noch die Softwarefrage of¬ 
fen. Vielleicht finden sich einige Pro¬ 
grammierer, die gerne Musiksoftware 
erstellen wollen. Diese Zeitung bietet 
dafür sicherlich ein gutes Forum. 

(Hartmut Pick) 
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midi für den Schneider 


Nachdem der C64 lange Zeit marktbe¬ 
herrschend in Bezug auf Musikcompu¬ 
ter gewesen war, werden jetzt auch 
Computer wie z.B. Atari ST und Amiga 
midifahig. CPC-Besitzer mußten aber 
lange auf das EMR MIDI-Interface 
warten. Jetzt ist es da, aber man muß 
ca. 500,— DM für das Interface (incl. 
Software) auf den Ladentisch legen. 
Der Selbstbau eines solchen Interfaces 
bietet hier die Möglichkeit, die gleiche 
Leistung für ein Viertel des Ladenprei¬ 
ses zu bekommen. 

Das Interface wird in diesem Falle nicht 
in der Form einer Karte für den ECB- 
Bus, sondern als eigenständiges Gerät 


zum Anschluß an den Expansionsport 
des 464, 664 und 6128 aufgebaut. Das 
MIDI-Interface ist im Grunde nur eine 
spezialisierte V-24-Schnittstelle, das 
heißt, daß die Schaltung mit dem selben 
IC SAB8251 arbeitet, das schon in 
Schneiderware # 3 als asynchrone und 
serielle Schnittstelle benutzt wurde. 
Der gesamte Aufbau gliedert sich in 
zwei Teile: Interface und Timer. 


Der MIDI-Standard 


Für alle, die nicht wissen sollten was 
MIDI ist, will ich es kurz erklären: 


MIDI ist ein Datenübertragungssystem 
für elektronische Musikinstrumente, 
das von führenden Herstellern dieser 
Instrumente wie Yamaha, Roland, Korg 
etc. genormt wurde. Mit diesem Sy¬ 
stem ist es möglich, z.B. mit einem 
Computer und geeigneter Software eine 
große Anzahl elektronischer Musikin¬ 
strumente zu arrangieren und damit zu 
komponieren. Der MIDI-Standard ba¬ 
siert auf einer asynchronen Übertra¬ 
gung serieller Daten mit einer Baudrate 
von 31.25 kBaud. Das Datenformat 
hierzu zeigt Bild 1. Die Sende- bzw. 
Empfangsdaten gliedern sich zum einen 
in Befehlsbytes und zum anderen in Da¬ 
tenbytes. Befehlsworte werden durch 
ein gesetztes siebtes Bit gekennzeich¬ 
net. Die Channelinformation-Daten — 
das sind die Befehle, die alle MIDI- 


Tabelle der MIDI-DATEN 


&9X NOTE AN schaltet Note ein 

3 Bytes: 1001nnnn 
Okkkkkkk / Ovvvvvvv 
nnnn:Kanalnummer 
Okkkkkkk: Tastennummer 
mittleres "C'=60 
Ovvvvvvv: Tastenanschlag 
Ohne Anschlagsdynamik =64 


&8X NOTE AUS schaltet Note aus 

3 Bytes: 1000nnnn 
Okkkkkkk / Ovvvvvvv 


&AX AFTERTOUCH nach Druecken der Taste 
3 Bytes lOlOnnnn 
Okkkkkkk / Ovvvvvvv 
Ovvvvvvv: Wert des Tasten¬ 
drucks 


&BX PARAMETER aendert Parameter 
3 Bytes: 1011nnnn 

0CCCCCCC / 0VVVVVVV 

Occccccc: Fararaeternummer 
Ovvvvvvv: Netier Wert 

&CX _ PRÖGRÄMMVECHSEL 

2 Bytes: 1100nnnn 
Oppppppp:Programmnumraer 


&EX PITCH VHEEL 3 Bytes: 1101nnnn 
Olllllll,0mmmmmmm 
14-Bit-Vert, zuerst LSB 
Mittelwert 0,64 
Maximum 127, 127 
Minimum O,0 


Tabelle 1: Auflistung der MIDI-Befehle 




KOMNANOOFORHAT 


Tabelle 2: Programmierung des 8251 
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INTERFACE 

PORTADRESSEN 

Adresse 

/ RD/WR / 

Funktion 

BiF8FF 

WR 

Reset 

&F8FF 

RD 


&F8F8 

WR 

Byte senden 

&F8F8 

RD 

Byte empfangen 

&F8F9 

WR 

Betriebsart/Kommando 

6cF8F9 

RD 

Flags lesen 

TIMER PORTADRESSEN 


Adresse 

/ RD/WR / 

Funktion 

&F8F4 

WR 

Kommando/Zeitkonstante 



Kanal 0 


RD 

Zaehlerstand lesen 

&F8F5 


Kanal 1 

kF8F6 


Kanal 2 

RcF8F7 


Kanal 3 

Tabelle 3: Portadressen des Interfaces und des Timers 


Keyboards gemeinsam haben (sollten) 
— fordern auf das Befehlsbyte jeweils 
entweder ein oder zwei Datenbytes. 

Weiterhin muß nicht nur übermittelt 
werden, ob es sich um ein Befehlswort 
handelt, sondern auch, welcher MIDI- 
Kanal benutzt wird. MIDI unterstützt 
bis zu 16 verschiedene Kanäle zur Da¬ 
tenübertragung. Somit kann man jedem 
angeschlossenen MIDI-Gerät nur die 
Daten zuordnen, die für das Gerät ge¬ 
dacht sind. Der MIDI-Kanal wird 
durch die unteren vier Bit des Befehls¬ 
bytes bestimmt. Eine Auflistung der 
wichtigsten Befehle zeigt Tabelle 1. 


Der Aufbau 


Der Aufbau teilt sich, wie oben gesagt, 
in zwei Teile. Das Interface selbst ist für 
zeitunkritische Anwendungen gedacht. 
Zeitunkritische Anwendungen sind 
z.B. Klangeditoren. Man kann jedoch 
nur Sequenzerprogramme laufen las¬ 
sen, wenn man die Timerkarte hinzu¬ 
zieht. Man sollte sich also im klaren 
darüber sein, ob man mit dem Interfa¬ 
ce professionell arbeiten will, oder ob 
man nur ein wenig experimentieren 


möchte. Der Timer liefert zusätzlich ein 
Taktsignal, das zur Synchronisation von 
Bandmaschinen und Drumcomputern 
genutzt werden kann bzw. kann ein ähn¬ 
liches Taktsignal dem Interface zur 
Synchronisation zugefiihrt werden (je 
nach Software 24 oder 48 Impulse pro 
Viertelnote). 

Das Interface besteht aus Adresscodie- 
rung, Resetcodierung, dem 8251, dem 
Baudratengenerator und den Datenlei¬ 
tungstreibern. Die nötige Sende- und 
Empfangsfrequenz wird durch Teilung 
des Prozessortaktes mittels IC 6 und IC 
7 erzeugt. Die beiden ICs sind vom Typ 
74LS93 und teilen die 4 MHz des Pro¬ 
zessors einmal durch 16 und durch 128. 
IC 1—3 bilden die Adresscodierung und 
die Resetsteuerung (Portadressen siehe 
Tabelle 3). Der 74LS245 dient als Bu¬ 
spuffer. Je nach Programmierung kann 
per J1 entweder auf 500 KHz oder auf 
31.25 kHz Sende- und Empfangstakt 
eingestellt werden. Dies dient der Kom¬ 
patibilität des Interfaces zu anderen 
(späteren) Programmen. Bei Verwen¬ 
dung der 500 KHz kann man auch auf 
IC 7 verzichten. Der Optokoppler 
CNY17 sorgt bei der Verbindung meh- 
rer Interfaces (Keyboards) für galvani¬ 
sche Signaltrennung, so daß keine 
Kurzschlüsse beim Zusammenschalten 


entstehen und sich auswirken können. 
Das Receive-Ready-Signal des 8251 
wird durch IC 5 invertiert und dem In¬ 
terrupteingang des CPC zugefiihrt, um 
einen Datenverlust durch Polling (stän¬ 
dige Abfrage des Ports) zu verhindern. 
Ein Problem der Interruptsteuerung trat 
bei der Entwicklung des Interfaces auf. 
Das durch den Inverter erzeugte Inter¬ 
ruptsignal blockierte den Computer 
vollständig, so daß der Einsatz eines 
Open-Collector-Typs nötig wurde. Bei 
dem »normalen« Typ entstand am INT- 
Eingang der Z80-CPU ein Kurzschluß 
mit dem Ausgang des Gate-Arrays. 
Schaltplan und Bestückung des Interfa¬ 
ces zeigen die Bilder 2 und 3. 


Der Platinenaufbau 

Die Layout- und Bestückungsseiten der 
Platine müssen bei der Selbstherstel¬ 
lung absolut deckungsgleich übereinan¬ 
der gebracht werden, damit man beim 
Bohren nicht aus Versehen eine Leiter¬ 
bahn der anderen Seite durchbohrt. An¬ 
schließend sollte man sich Kupferhohl¬ 
nieten mit 1 mm Durchmesser besorgen 
und alle Bohrungen durchkontaktieren. 
Wem das zu aufwendig ist, der kann 
sich auch WireWrap-IC-Fassungen be¬ 
sorgen, bei denen ein beidseitiges Ver¬ 
löten gut möglich ist. Beim Bestücken 
der Platine sollte man wie immer die 
Reihenfolge: Brücken, Widerstände, 
Kondensatoren, IC-Fassungen, Dioden 
und übrige Halbleiter einhalten. Der 
Einbau in ein Gehäuse erfolgt so, daß 
noch Platz für die Timerplatine ist, falls 
sie eingebaut werden soll. 


Inbetriebnahme des Interfaces 

Die fertige Platine wird nach einer op¬ 
tischen Kontrolle an eine Stromversor¬ 
gung angeschlossen, ohne daß die ICs 
eingesteckt sind, und nach Kurzschlüs¬ 
sen in der Stromversorgung untersucht. 
Erst dann wird die Platine ohne ICs an 
den Expansionsport über ein 50-poliges 
Flachkabel mit den entsprechenden 
Steckverbindern angeschlossen. (Bild 4 
zeigt das Schema hierzu.) Sollte der 
Computer abstürzen, muß die Platine 
dringend nach Kurzschlüssen unter¬ 
sucht werden. Ansonsten kann begon- 
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Bedeutung 

der GTC-Steuerwort-Bits 

BIT 4 

Polaritaet der aktiven Flanke des CLK/TRG-Eingangs; 
0 = negative Flanke 

1 = positive Flanke 

BIT 

0 

muss immer 1 sein! (gilt sonst als Interruptvektor) 


BIT 

1 

0 

1 

= 

keine Wirkung 

Reset, stoppt den Zaehlvorgang des Kanals. 

Ist BIT 2 ebenfalls 1, so laeuft der Kanal nach 
Laden einer Zeitkonstante erneut an. Anderfalls 

BIT 5 

nur fuer Zeitgeber-Modus! 

0 = Vorteiler 16 

1 = Vorteiler 256 





muss ein neues Steuerwort gesendet werden. 

BIT 6 

Wahl des Modus; 

0 = Zeitgeber-Modus 

1 = Zeahler-Modus 

BIT 

2 

0 

= 

folgendes Byte ist Steuerwort (oder Interrupt¬ 
vektor, bei Kanal 0) 




1 

= 

folgendes byte ist Zeitkonstante 

BIT 7 

Interrupt-Freigabe 

0 = Kanal kann keine Interrupts ausloesen 

1 = Kanal loest bei jedem nachfolgenden Nulldurch¬ 
gang des Rueckwaertszaehlers einen Interrupt 
aus. 

BIT 

3 

nur 

0 = 

1 = 

fuer Zeitgeber-Modus: 

Zaehler startet unmittelbar nach Laden der 
Zeitkonstante 

Zaehler startet erst nach Trlggarflanke am 






CLK/TRG-Bingang, die auf das Laden der Zeit¬ 
konstante folgt. 

Tabelle 4: Programmierung des CTC 


nen werden, die ICs 1—7 einzustecken 
und erneut wird der Computer einge¬ 
schaltet. Vorsicht! Manipulationen an 
der Platine nur bei ausgeschaltetem 
Computer vornehmem! Ist soweit alles 
in Ordnung, wird auch IC 8 eingesetzt. 
Im anderen Fall müssen alle Signale 
nochmals überprüft werden. 


Stückliste: Interface 

RI,2,3,4,6 220 R 

R5 4k7 

C1-C9 100 nF 

Dl 1N4148 

Optokoppler CNY 17 

IC 1,2 74 LS 00 

IC 3 74 LS 02 

IC 4 74 LS 245 

IC 5 74 LS 03 

IC 6,7 74 LS 93 

IC 8 SAB 8251 

IC 9 74 LS 14 

3 Dinbuchsen 5-pol. für Printmontage 


Programmierung des Interfaces 


Vor Beginn der Sendung oder des Emp¬ 
fangs von Daten muß der SAB 8251 mit 
einem Satz von Steuerworten geladen 
werden. Diese Steuersignale legen die 
gesamten Funktionseigenschaften des 
SAB 8251 fest und müssen unmittelbar 
nach einem Resetvorgang (Einschalten 
des Computers) folgen. Die Steuerwor¬ 
te teilen sich in zwei Formate auf: 

— Betriebsart 

— Kommando 

Das Betriebsarten-Format legt Daten¬ 
geschwindigkeit, Zeichenlänge und 
Start- und Stopbits fest (siehe Tabelle 2). 
Das Kommando-Format regelt die 


Start 

BIT 


DATENBUS 


Stop 

BIT 


Bild 1: Datenformat der MIDI-Ubertragung 



Empfangs- und Sendefreigabe. Beide 
Formate müssen direkt aufeinander 
folgen. 


Anschluß und Probe 


Nach Verbindung der Buchse MIDI¬ 
OUT am Interface und der Buchse 
MIDI-IN an einem MIDI-Keyboard 


durch ein DIN-Kabel kann Listing 1 
eingegeben und gestartet werden. Nach 
dem Start muß das MIDI-Keyboard für 
einen Moment einen C-Dreiklang aus¬ 
geben. Funktioniert dies soweit, kann 
man zunächst zum Punkt MIDI-RE¬ 
CORDER übergehen. Ansonsten ist es 
nötig, alle Verbindungen zu überprüfen 
und nach möglichen Unterbrechungen 
und Kurzschlüssen zu untersuchen. Die 
Eingabe bzw. der Start des Listings 1 ist 
dann zu wiederholen. 
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Bild 3: Bestückungsplan des Interfaces 



Timer & Synchronizer 


Wozu der Timer? Der einzige im CPC 
befindliche Timer ist der Fast-Ticker, 
der mit einer Frequenz von 300 Hertz 
arbeitet. Die für einen Sequenzer benö¬ 
tigten Tempi liegen zwischen 40 und 
400 Beats per Minute, d.h. Viertelno¬ 
ten pro Minute. Bei einer Auflösung 
von 48 Schlägen pro Viertel ergeben 
sich Timerfrequenzen zwischen 32 und 
192 Hz, die nur durch Division der 300 
Hz des CPC-Timers durch die ge¬ 
wünschte Frequenz erreichbar sind. 
Beachtet man, daß nur durch Integer¬ 
zahlen dividiert werden kann, so ist nur 
eine Unterteilung in 8 Tempi möglich. 
Je höher die Timergrundfrequenz ist. 


desto größer ist also auch die Auflösung 
der Geschwindigkeitsregelung. Als Ti¬ 
merbaustein dient ein Z80 CTC, der für 
die Verwendung in Z80 Systemen op¬ 
timiert ist. Er enthält vier 8 Bit-Timer, 
die durch Verbindung ihrer Ein- und 
Ausgänge kaskadiert werden können. 
Die Programmierung des CTC kann 
Tabelle 4 entnommem werden. Das 
IC3 74 LS 121 ist ein Monoflop, das die 
extrem kurzen Impulse des CTC ver¬ 
längert. Die Impulslänge des CTC be¬ 
trägt nur die Länge eines 4 MHz- 
Taktimpulses des Prozessortaktes, von 
dem der CTC gespeist wird. Die ge¬ 
streckten Impulse werden über zwei 
open-collector-Inverter des 74LS05 auf 
saubere TTL-Pegel gebracht, die direkt 
am Sync-OUT-Ausgang abgenommen 
werden können. Die anderen beiden In¬ 


verter bereiten das Signal am Sync-IN- 
Eingang auf und geben ihn auf den Ti¬ 
mer, der die ankommenden Impulse 
zählt. Der Öffner in der Sync-IN- 
Buchse schaltet dann den internen Takt 
der oberen beiden Timer ab. Die Ti¬ 
merplatine ist nur einseitig ausgelegt, 
so daß bei der Herstellung keine Pro¬ 
bleme auftreten dürften. Bei der Be¬ 
stückung geht man genauso vor wie bei 
der Interfaceplatine. Schaltplan und Be¬ 
stückungsplan zum Timer zeigen Bild 
5 und 6. Nachdem die fertige und über¬ 
prüfte Platine an Interface und Compu¬ 
ter angeschlossen worden ist, kann Li- 
sting 2 eingegeben und gestartet wer¬ 
den. Auf dem Bildschirm sollte eine 
Zahl erscheinen, die im Sekundentakt 
dekrementiert wird. Darauf wird ein 
Klinkenkabel in die Sync-IN-Buchse 
gesteckt. Der Zählvorgang wird nun 
unterbrochen und erst nach Einstecken 
des anderen Kabelendes in die Sync- 
OUT-Buchse fortgesetzt. Der Hardwa¬ 
reaufbau ist somit abgeschlossen. Die 
Kosten für die Bauteile liegen bei ca. 
120, — DM. Wie Interface und Timer 
zusammengebaut werden, zeigt Bild 7. 

Stückliste: Timer 

R1-R6 lk 
CI luF/16 Volt 

IC 1 74 LS 32 
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IC 2 Z80 A CTC 

IC 3 74 LS 121 

IC 4 74 LS 05 

Klinkenbuchse 6,3 mm mono 
Klinkenbuchse 6,3 mm mono mit 
Öffner 


Der MIDI-Recorder 


Das beste Interface nützt ohne Software 
gar nichts, also müssen Treiberroutinen 
her. Daß das Senden von Daten ziem¬ 
lich einfach ist, hat Listing 1 gezeigt. 
BASIC ist also für das Senden »lang¬ 
sam« genug. Warum langsam genug, 
werden sich einige fragen, aber es ist 
kein Denkfehler. Beachtet man, daß der 
MIDI-Standard eine Übertragungsrate 
von 31.25 kBaud hat, erkennt man re¬ 
lativ schnell, daß zwischen zwei zu sen¬ 
denden Daten genau 320 Mikrosekun¬ 
den »Wartezeit« liegen, bevor das näch¬ 
ste Byte gesendet werden kann. Diese 
Zeit berechnet sich daraus, daß ein 
übertragenes Datenwort aus acht Bit 
plus Start- und Stopbit besteht, d.h., 
daß bei 31.25 kBit pro Sekunde genau 
3125 Daten pro Sekunde übertragen 
werden. Diese Zeit überbrückt BASIC 
allein schon durch den Sprung von ei¬ 
ner Zeile zur anderen. Nur bei Maschi¬ 
nensprache muß man aufpassen. Hier 
ist nach jeder Ausgabe in das Datenre¬ 
gister des 8251 eine Warteschleife ein¬ 
zubauen: 

LD BC, &F8F8 
LD A, Datenwort 
OUT (C), A 
LD B, &40 
LOOP: NOP 
DJNZ, LOOP 

Wo bekommt man die ganzen Sendeda¬ 
ten her? Richtig! Man kann sie ja vor¬ 
herempfangen, indem man z.B. von ei¬ 
nem MIDI-Keyboard einspielt. 

Was geschieht also beim Empfangen? 
Sobald der 8251 ein Datenwort voll¬ 
ständig erkannt hat, setzt er seinen 
Receive-Ready-Ausgang, so daß ein In¬ 
terrupt am Eingang des CPC entsteht. 
Dieser Interrupt bleibt so lange erhal¬ 
ten, bis ein Zugriff auf das Datenregi¬ 
ster des 8251 erfolgt. Das Interrupt- 
Signal wird vom CPC erkannt und die¬ 
ser führt dann einen RST7 zur Adres¬ 




se &B939 beim 464 bzw. zur Adresse 
&B941 beim 664 und 6128 aus. Dort 
wird zwischen einem externen Inter¬ 
rupt vom Interface und dem internen 
Fast-Ticker unterschieden. Innerhalb 
der Interruptroutine wird nochmals 
kurzzeitig ein Interrupt zugelassen. 
Liegt dann immer noch ein Interrupt 
an, springt der Computer in die Ab¬ 
handlung des externen Interrupts. Ein 
interner Interrupt wäre an dieser Stel¬ 
le schon längst ausgeschaltet. An der 
Adresse &003B muß dann ein Sprung¬ 
befehl zur Interruptroutine für die An¬ 
nahme der ankommenden Daten ste¬ 


hen. Doch die Routine für interne Inter¬ 
rupts ist für unsere Übertragungsge¬ 
schwindigkeit schon ein Hindernis. 
Diese Interruptroutine sorgt im CPC 
für die Tastaturabfrage und alle anderen 
interruptgesteuerten Programmteile 
und ist somit mehr als eine Millisekun¬ 
de lang. Kommen nun MIDI-Daten 
während der Abarbeitung der Interrupt- 
routine kurz hintereinander, so gehen 
Daten verloren, da das Interface keinen 
Interrupt auslösen kann und nach 320 
Mikrosekunden das aktuelle Datenwort 
überschrieben wird. Somit ist es nötig, 
beim 464 an der Adresse &B949 und 
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beim 664 bzw. 6128 an der Adresse 
&B951 eine Adresse auf eine eigene In¬ 
terruptroutine zu legen, die Aufnahme 
der Daten durchzuführen und wieder 
die Originaladresse &00B1 einzufugen. 
Als Beispiel für diese Nutzung dient 
das Listing 3, mit dem es möglich ist, 
MIDI-Daten wie bei einem Kassetten¬ 
recorder aufzunehmen und wiederzu¬ 
geben. Die invertiert dargestellten 
Buchstaben im Programmenue müssen 
gedrückt werden, um die entsprechen¬ 
de Funktion zu erhalten. Ich hoffe, daß 
ich einige Anregungen zum Experi¬ 
mentieren gegeben habe. Demnächst 
möchte ich eine 8-Spur-Sequenzer- 
Software für das Interface vorstellen. 

Bis dahin viel Spaß! 

(D. Siegmund/ME) 




c d Schneider-Computer- 
Kredit. 

Jetzt können Sie sich Ihren ^ 

Computertraum noch leichter z ' o b0t/ 
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The Programmer’s Toolbox 

PROFESSIONELLE ENTWICKLUNGSWERKZEUGE 
ProsperO Software = Compiler für höchste Ansprüche 


LANGUAGES FOR MiCROCOMPUTER PROFESSIONAL 

Pro Pascal: PC und Compatiblen DM 999,- 

AtariST DM429,- 

JoycePCW DM239,- 

Pro Fortran: Joyce PCW DM239,- 

Pro Fortran 77: PC und Compatiblen DM 1.439,- 
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Bild 9: Layout des Interfaces (.Bestückungsseite) 
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Listing 1: Testprogramm für das Interface 


140 OUT &F8F8, 8(40:'NOTE ”E” 

150 OUT &F8F8,&40:'AUS 

[704] 

[794] 

10 OUT &F6FF, &0: 

RESET 

[15661 

160 OUT &F8F8,&43:'NOTE ”G” 

170 OUT &F8F8,&40:'AUS 

[974] 

[794] 

20 OUT &F8F9,&6E: 
30 OUT &F8F8,&90; 

OUT &F8F9,*13:'NUR SENDEN 
'MIDI NOTE ON 

[17403 

[557] 

Listing 2: Der Timertester 


40 OUT &F8F8,&3C: 
50 OUT &F8F8,&40: 

'NOTE "C" 

'AN 

[605] 

[699] 

10 OUT &F8F4, 8(5: 'KANAL 1 

[280] 

60 OUT &F8F8.&40: 

'NOTE "E” 

[704] 

20 OUT &F8F4,250 

[60] 

70 OUT &F8F8,5(40 : 

'AN 

[699] 

30 OUT &F5F5,&45:'KANAL 2 

[763] 

80 OUT &F8F8,&43: 

'NOTE "G” 

[974] 

40 OUT &F8F5.100 

C58] 

90 OUT &F8F8, &40 : 

'AN 

[6991 

50 OUT &F8F6,8(45;'KANAL 3 

[336] 

100 FOR zeit=l TO 

2000:NEXT zeit 

[1971] 

60 OUT &F8F6,10 

[427] 

110 OUT &F6F8,8(80 

:'MIDI NOTE OFF 

[1559] 

70 OUT &F8F7, 8(45:'KANAL 4 

[731] 

120 OUT &F8F8,&3C 

:'NOTE "C" 

[605] 

80 OUT &F8F7.&FF 

[449] 

130 OUT &F8F8.&40 

: 'AUS 

[794] 

90 PRINT INPC8(F8F7) : GOTO 90 

[1670] 
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Listing 3: Der MIDl-Recorder Listing 3a 

1«) MODE 1; BOEDER 26: IKK 0,0: IKK 1,26 
2® IF HIMEM=&2FFF THEK 70 ELSE MEMORY &2FF 
F:LOAD"!MIDIBIM. bin" , &A000 
30 REM MX COMPUTEF.TYP-AUSWAHL *** 

40 IF PEEK(&B948)=&CD THEK 70 

50 FOKE &A007,&E4:POKE &A03D,&B4:POKE %A04 

1,&B4:POKE &A0A6,&B4:POKE &A0C0,&B4:POKE & 

A101, &B4: POKE &A008,&B8:POKE &A03E, &B8: POK 

E &A042,&B8: POKE &A0A7 , &B8 : POKE &A0C1.&B8: 

POKE &A102, 8rB8: POKE &A02C, &51: POKE &A084.8! 

51:POKE &A07D.&5A 

60 REM XXX* BILDAUFBAU XXXX 

70 LQCATE 2,1:PRIKT CHR$(150);STRINGS(36,1 

54);CHRS <156) 

80 LOCATE 5,2:PRINT" XXXX MIDI - RECORDER V 
1.0 ****’’ 

90 LOCATE 9,4:PRINT CHR$(164);" 1986 by SI 
EGMUND-SOFT" 

100 LOCATE 2,5:PRINT CHRS<147);STRINGS(36, 
154),-CHRS(153) 

110 FOR a=2 TO 4:LOCATE 2,a:PRINT CHRS(149 
):LOCATE 39,a:PRINT CHRS(149):NEXT 
120 LOCATE 2,6:PRINT CHRS(150>;STRINGS(17, 
154);CHRS(156);CHRS(150);STRINGS(17,154);C 
HRS(156) 

130 LOCATE 2,24:PRINT CHRS(147);STRINGS(17 
, 154);CHRS(153);CHRS(147);STRINGS(17,154) ; 
CHRS(153) 

140 FOR a=7 TO 23:LOCATE 2,a:PRINT CHRS(14 
9):LOCATE 20,a:PRINT CHRS(149):LOCATE 21, a 
:PRINT CHRS(149):LOCATE 39,a:PRINT CHRS(14 
9):NEXT 

150 PRINT CHRS<24):LOCATE 4,7:PRINT" RECOR 
D-TRACK LOCATE 23,7:PRINT" PLAY-TRACK 
";CHRS(24) 

160 LOCATE 2,8:PRINT CHRS(151);STRINGS(17, 
154);CHRS(157);CHRS(151);STR INGS(17, 154);C 
HRS(157) 

170 LOCATE 4,23: PR I NT"MEMORY:”;STRINGS(8,9 
5):LOCATE 2,22:PRINT CHRS(151);STRINGS(17, 
154);CHR$(157) 

180 LOCATE 24,16:PRINT CHRS(24);"M";CHRS(2 
4);”IDICHANNEL= 1" 

190 MOVE 90,206:GOSUB 290:LOCATE 8,11:PRIN 
T CHRS(24);"D";CHRS(24);"ELETE" ; 

200 MOVE 90,142:GOSUB 290:LOCATE 8,15:PRIN 
T CHRS(24);"S”;CHRS(24) ; "TART" 

210 MOVE 90,78:GOSUB 290:LOCATE 6,19:PRINT 
"S" ; CHRS (24) ; "T" ; CHRS(24) ; "OP" 

220 MOVE 356,164:GOSUB 310:LOCATE 24,12:PR 
INT CHRS(24);"R";CHRS(24);"ESET" 

230 MOVE 356,36:GOSUB 310:LOCATE 24,20:PRI 
NT"ST";CHRS(24);"A”;CHR$(24> ; "RT” 

240 MOVE 484,164:GOSUB 310:LOCATE 32,12:PR 
INT CHRS(24);"C”;CHR$(24);"ONT" 

250 MOVE 484,36:GOSUB 310:LOCATE 32,20:PRI 
NT"ST";CHRS(24);"0";CHRS(24) ; "P" 

260 LOCATE 6,25:PRINT"Inversed letter for 
functian !" 

270 GOTO 340 
280 END 

290 DRAWR 140,0:DRAWR 0,50:DRAWR -140,0:DR 
AVR 0,-50: DRAWR 8,8:DRAWR 124,0:DRAWR 8,-8 
:DRAWR -8, 8: DRAWR 0,34:DRAWR 8,8:DRAWR -8, 
-8:DRAWR -124,0:DRAWR -8,8:DRAWR 5,-8:DRAW 
R 0,-34 
300 RETURN 

310 DRAWR 100,0:DRAWR -8,8:DRAWR -84,0;DRA 
WR -8,-8:DRAWR 0,100: DRAWR 100,0;DRAWR -8, 
-6:DRAWR -84,0:DRAWR -8,8:DRAWR 8,-8:DRAWR 
0,-84:MOVER 84,84:DRAWR 0,-84: DRAWR 8,-8: 
DRAWR 0, 100 
320 RETURN 

330 REM XXX INITIALISIERUNG XXX 
340 CONTrol=l: POKE &3B, 8rC3; POKE &3C,S:0:POK 
E &3D,&A0:POKE &A020,0:POKE &A021,0;POKE & 
A024,0:POKE &A025,&30:POKE &A203,0:POKE &A 
204,6(30: POKE &A205,1:POKE &A11F.6S0 
350 a$=INKEYS;IF aS = ”” THEN 350 
360 IF a$=”D" OR aS="d” THEN GOSUB 550 
370 IF aS=”R" OR a$=”r" THEN POKE &A203,0: 
POKE &A204 , &30: POKE &A020,0:POKE &A021,0:F 
OKE &A205,1 


1295 

1479 


h] 


[18241 
C1541] 
[11319] 


[1132] 
C 28751 

[31713 

[38463 

(32313 

[46503 

[48653 

[44883 

(65023 

[5927] 

(47503 

(55413 

[34953 

[4567] 

(31573 

[53093 

[37163 

[26453 

C33613 

(18533 

C45993 

[4643 

[ 110 ] 

(82983 


(5551 
[121323 


(5553 

(11373 

(83663 


(14103 
C1069] 
[45533 


380 IF a$="S" OR aS=”s" THEN 420 (18303 

390 IF aS="A" OR aS="a” THEN 470 [19453 

400 IF aS="M" OR aS="m" THEN GOSUB 560 [2160] 

410 GOTO 350 [470] 

420 IF CONTrol=l THEN 430 ELSE 350 (9793 


430 CALL &A028:CONTral=0:REM XXX AUFNAHME (25923 
XXX 

440 mexD= INT( (PEEK(&A024) +256*PEEK(&A025)-& [25413 


3000>/384>:MOVE 160+ mem,34 : DRAWR 0,8 
450 a$= INKEYS: IF aS=”" THEN 440 [13763 

460 GOTO 350 (4703 

470 CALL &A08E: REM *** WIEDERGABE XXX C20063 

480 oS=INKEYS:IF aS = ”" THEN 480 (13683 

490 IF aS="C" OR aS="c" THEN CALL &A0A2 [17883 


500 IF a$="R" OR a$="r" THEN POKE &A203.0: (5510] 
POKE &A204,&30:POKE &A020,0:FOKE &A021,0:F 
OKE &A205,1:GOTO 350 

510 IF a$="D" OR aS=”d" THEN GOSUB 550:GOT [22113 
0 350 


520 IF a$="S" OR aS="s" THEN 420 (18303 

530 IF a$="M" OR a$="m" THEN GOSUB 560 C21603 

540 GOTO 480 [3733 

550 CONTrol = l: CALL &A120:POKE &A024,0: POKE [7941] 
4A025,&30:LOCATE 11,23:PRINT STRINGS<8,95 
):OUT &F8FF,0:RETURN 

560 LOCATE 37’, 16:PRINT CHRS(47) [13233 

570 aS=INKEYS:IF a$="" THEN 570 [13823 

580 IF a$<"9" AND aS>"0" THEN LOCATE 37,16 [26183 
.•PRINT a$ ELSE 570 

590 POKE &A11F,VAL(aS)-l:RETURN [9921 


Listing 3b 

10 '***********DATAS FUER MI DI BIN********* [21753 

15 MEMORY &9FFF: sum=0 (3293 

20 FOR i=40960 TO 41280:READ a:POKE i,a:su (24193 
m=sum+a:NEXT 

30 DATA 1,248,248,237,120,237,91,135,177,4 [29173 
2,36,160,119,35,123 

40 DATA 119,35,122,119,35,34,36,160,17,253 (29633 
.143,237,82,192,195 

50 DATA 128,160,0,0,0,247,0,48,0,48,33,64, (18383 

160,34,73 

60 DATA 185,1,249,248,62,110,237,121,62,23 C25583 
,237,121,33,0,0 

70 DATA 34,135,177,201,33,135,177,52,35,40 (23073 
,252,1,14,244,237 

80 DATA 73,6,246,237,120,230,48,79,246,192 r30103 
,237,121,237,73,4 

90 DATA 62,146,237,121,197,1,70,246,237,73 (21803 
,6,244,237,120,50 

100 DATA 35,160,193,62,130,237,121,5,237,7 (26163 
3,58,35,160,254,247 

110 DATA 40,6,62,1,50,82.185,201,33,177,0, (18723 

34,73,185,1 

120 DATA 249,248,62,19,237,121,201,42,3,16 T20793 
2,126,35,78,35,70 

130 DATA 35,34,3,162,33,0.162,113,35,112,3 [21491 
5,119,42,32,160 

140 DATA 34,135,177,205,190,160,205,9,187, (19183 

254,111,40,78,58,5 

150 DATA 162,254,0,40,71,24,237,0,0,0,237, (18683 

91, 135,177,42 

160 DATA 0,162,237,82,125,180,32,52,205,7, (28443 

161,1,248,248,237 

170 DATA 121,6,70,0,16,253,42,3,162,126,50 [23053 
,2,162,35,94 

180 DATA 35,86,35,34,3,162,237,83,0,162,23 (28543 
7,91,36,160,235 

190 DATA 237,82,125,180,40,2,24,198,62,0,5 [23223 
0,5,162,24,191 

200 DATA 201,42,135,177,34,32,160,201,58,2 [36433 
,162,203,127,200,230 

210 DATA 240,71,58,31,161,128,201,0,0,0,0, [12003 

0 , 0 , 0,0 

220 DATA 0,0,0,33,0,48,17,1,48,1,254,95,54 [24463 
,0,237 

230 DATA 176,201,0,0,0,1,190,32,28,5,162,4 [20453 
4,15,0,28 

240 DATA 0,34,1,3,0,0,0,0,0,0,0,0,0,0,0 (15073 

245 IF sum<>32314 THEN PRINT”FEHLER IN DAT (21213 
AS" 

250 '*******MIT SAVE”MIDIBIN. BIN” , B, 8iA000, (25313 
&0200 abspeichern*********** 
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Diesen Monat haben wir im Floppy- 
kurs etwas ganz besonderes zu bie¬ 
ten. Ein vollständiges Anwendungs¬ 
programm, mit dessen Hilfe Sie die 
Speicherkapazität einer normalen 
Diskette vervielfachen können. Das 
Programm wurde samt dem zugehö¬ 
rigen Grundlagenbericht von unse¬ 
rem Leser Harald Lipinski erstellt. 
Nach eingehender Prüfung wurde es 
für gut genug befunden, im Rahmen 
des Floppykurses an die Leser wei¬ 
tergegeben zu werden. 

Leider funktioniert die Routine nicht 
mit den Vortex Laufwerken, da die ja 
ohnehin schon eine höhere Speicherka¬ 
pazität haben. Der komplette Assem¬ 
blerquelltext hat leider wegen seines 
großen Umfangs keinen Platz im Heft 
gefunden, ist jedoch auf der DATABOX 
enthalten. 


21 kBytes mehr auf Diskette, 
durch sechs RSX mit »FORMAT« 


Dieses Programm ermöglicht eine völ¬ 
lig freie Formatierung Ihrer Diskette. 


Merkmale von »FORMAT« sind: freie 
Wahl der Sektoranzahl pro Track, freie 
Wahl der Sektornummer sowie freie 
Wahl der Sektorlänge. So sind Sie zum 
Beispiel nun in der Lage, bis zu zehn 
Sektoren (bisher lediglich neun!) zu je 
512 Bytes über alle Tracks (Track 0 bis 
42) zu formatieren. 

Es werden Ihnen somit weitere 21 Ki¬ 
lobytes auf Diskette, unter Verwendung 
des Systemformats, zur freien Verfü¬ 
gung gestellt. Weiterhin ist es nun auch 
möglich, von jedem Standardformat 
abzuweichen und sich ein eigenes zu 
kreieren. 

Als erstes möchte ich Ihnen die neuen 
Befehle und ihre Anwendung vor¬ 
stellen. 

1. IFORMAT, sektornummer 
l,sek.nr. 2,sek.nr. 3,...,Sektor länge, 
track 

Dieser Befehl dient der freien Forma¬ 
tierung einer Spur. Der Strich symbo¬ 
lisiert hier das Zeichen über dem Klam¬ 
meraffen. Die Parameter hinter dem 
Kommandowort stehen für die mittels 
Kommata aufzulistenden Sektornum- 
mem. Nach den Sektomummern folgt 


der Parameter der Sektorlänge im Be¬ 
reich von 0 bis 5. Die tatsächliche Sek¬ 
torlänge errechnet sich aus der Formel 

2T (7-f-sektorlänge) 0 

Also steht 0 für 128 Bytes, 1 für 256 
Bytes,..., 5 für 4096 Bytes. Nun muß 
man beim Formatieren bedenken, daß 
jede Spur eine Gesamtkapazität von 
etwa 6 Kilo Bytes zur Verfügung stellt. 
Dies hat zur Folge, daß die Sektoran¬ 
zahl abhängig von der Sektorlänge ist. 
Tabelle 1 gibt bei allen Sektorlängen 
Aufschluß über die maximale Sektor¬ 
anzahl pro Spur. 

2. IREAD,Track,sektornummer 

Dieser Befehl dient dem Lesen eines 
Sektors. Der Parameter Track bezieht 
sich auf die zu bearbeitende Spur. Die 
Sektomummer meint den Offset des zu 
lesenden Sektors. »Versuche« teilt dem 
FDC mit, wieviel mal er den Lesevor¬ 
gang wiederholen soll, wenn ein Sek¬ 
tor nicht lesbar ist. Der vom Amsdos 
gewählte Standardwert liegt bei zehn. 
Manchmal ist es jedoch sinnvoll, die¬ 
sen zu erhöhen, um einen schwer les¬ 
baren Sektor dennoch laden zu können. 
Die geringste Zahl der Versuche ist 1. 

3.1WRITE,track ,sektornummer 

Dieser Befehl dient dem Schreiben ei¬ 
nes Sektors. Parameter: Track, Sektor¬ 
nummer siehe READ. 

4. !BUFFER,adresse 

Mittels dieses Befehls wird der 
READ/WRITE-Buffer festgelegt. Der 
Parameter Adresse gibt den Speicher¬ 
bereich an, den die beiden Schreib-/Le- 
sekommandos als In/Out-Buffer ver¬ 
wenden können. Als Standard wurde 
&9200 gewählt. Bei der Wahl der 
Adresse ist darauf zu achten, daß der 
Buffer mindestens ebenso groß ist, wie 
die verwendete Sektorlänge auf Dis¬ 
kette. 

5. Unit,sektoranzahl,sektorlänge 

Dieses Kommando signalisiert Ihrem 
Rechner, um welches Format es sich 
bei der eingelegten Diskette handelt. 
Dieser Befehl wird nötig, wenn beim 
Formatieren der Diskette Modifikatio¬ 
nen bei der Sektorenzahl oder der Sek¬ 
torlänge vorgenommen wurden. 


Tabelle 1 


Sektorlänge 

Sektorlänge/Bytes 

Sektoranzahl Nutzb. Kapazit./Bytes 

(0) 

128 

25 

3200 

(1) 

256 

17 

4352 

(2) 

512 

10 

5120 

(3) 

1024 

5 

5120 

(4) 

2048 

2 

4096 

(5) 

4096 

1 

4096 

Die letzte Angabe, »Track«, bezieht sich auf die zu 

formatierende Spur. 
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Beispielsweise ist dies der Fall, wenn 
Sie ein System-Reset durchgefiihrt bzw. 
den Rechner gerade eingeschaltet ha¬ 
ben und das Format der eingelegten 
Diskette vom Standard abweicht. Der 
Parameter »Sektoranzahl« benennt die 
Anzahl (der folgende die Länge), der 
verwendeten Sektoren auf der zuzugrei¬ 
fenden Spur. 

6. iSeek,Track 

»Seek« weist den FDC an, den Schreib- 
/Lesekopf, auf den angegebenen Track 
zu positionieren. 

Nützlich wird dieser Befehl, wenn Sie 
z.B. mittels READ den Kopf auf Track 
42 geführt haben und danach den Ka¬ 
talog sehen wollen. Sie werden erstaunt 
feststellen, daß »Read Fail« ausgegeben 
wird. Der Grund hierfür liegt nicht dar¬ 
in, daß jetzt Ihre Diskette »vernudelt« 
ist, sondern daß Ihr Rechner die Kopf¬ 
positionierung auf Spur 41 nicht be¬ 
merkt hat und sich noch in der alten 
glaubt. Somit verläuft die Kopfrückfuh- 
rung fehlerhaft, und es gibt einen Disk- 
Error. Um dies zu umgehen, geben Sie 


ISeek,0 ein, und alles läuft wieder ein¬ 
wandfrei. 

Achtung! Bitte nur sinnvolle Spur- 
nummern angeben (0-42)!!! 


Erläuterung und Grundlagen 
des Programms 


Vielleicht werden Sie sich fragen, wie 
der zehnte Sektor, bei einer Länge von 
jeweils 512 Bytes, möglich ist. Denn 
das Problem, daß sich dem zehnten 
Sektor entgegenstellt, ist kein geringe¬ 
res, als daß der mangelnden Speicher¬ 
kapazität einer jeden Spur. 

Die Lösung für dieses Problem liegt in 
der Tatsache, daß beim Formatieren 
verschiedene Byte-Folgen geschrieben 
werden. Diese Byte-Folgen werden all¬ 
gemein Gaps (Lücken) genannt. Es ist 
deren einzige Aufgabe, Toleranzen der 
Diskettenumdrehungsgeschwindigkeit 
auszugleichen. Hier Gap 3 genannt. 
Weiterhin gibt es eine Byte-Sequenz, 
die aus den nach dem Formatieren noch 


»übriggebliebenen« Bytes gebildet wird 
und sonst keine besondere Aufgabe er¬ 
füllt. Diesen »Speicherkapazitätsrest« 
findet man am Schluß eines jeden 
Tracks und wird Gap 4B genannt. Die 
Länge des Gap 4B liegt, je nach Wahl 
der Sektorlänge, zwischen 590 und 
660. Die Zahl der benötigten Bytes, um 
einen 512 langen Sektor zu Formatie¬ 
ren, liegt jedoch zwischen 660 und 690. 
Nun gilt es, beim Formatieren irgend¬ 
wo ein paar Bytes »abzuknapsen«. 
Schon erhält man den noch fehlenden 
Speicherplatz, um einen weiteren Sek¬ 
tor einrichten zu können. 

Beim genaueren Studieren des DOS 
und durch ein wenig Probieren erkennt 
man, daß die Länge des Gap 3 lediglich 
aus Datensicherheitsgründen fast dop¬ 
pelt so hoch gewählt ist, wie beim 
Schreib-/Lesezugriff. Unzählige Versu¬ 
che ergaben jedoch, daß man diesen 
Gap 3 ruhig etwas verkürzen kann, 
ohne an Sicherheit zu verlieren. Also 
können durch gezieltes Reduzieren der 
Gap 3-Länge die wenigen noch nötigen 
Bytes freigesetzt werden. 


RUF DIE TflSTEfl 
ERTER,RUH 
und ab die Post 

Zwei gute Argumente, Ihre Programme in PC Schneider International zu veröffentlichen! 


s. 


Für den Programmhit des Monats gibt es sage und schreibe !□□□,- DD 

Für den besten Tip stolze an- Din 

Also: Auf die Tasten, ENTER, RUN und ab die Post an: 

PC Schneider International 

DMV Daten & Medien Verlagsgesellschaft mbH, 

Fuldaer Straße 6, 3440 Eschwege 


Neben dem Spaß am Computer 
auch den lukrativen Lohn für 
die Arbeit erhalten. 


Eigene Erfolge zum Nutzen 
vieler weitergeben. 
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Anwendungsbeispiel 

Wir nehmen einmal an. Sie möchten 
die zusätzlichen 21 Kilobytes nutzen. 

1. Schritt: 

Die Diskette mit 10 Sektoren ä 512 By¬ 
tes pro Track formatieren. 

10 FOR TRACK=0 TO 42 

20 lFORMAT,&41,&42,&43,&44, 
&45,&46,&47,&48,&49,&4A,2, 
TRACK 

30 NEXT TRACK 

Jetzt haben wir die Diskette mit dem 
Systemformat beschrieben. Das Sy¬ 
stemformat bringt uns den Vorteil, daß 
der Rechner, ohne Nötigwerden des 
Initialisierungsbefehls, diese Diskette 
lesen und schreiben kann. Jedoch ist zu 
bedenken, daß die zusätzlichen Sekto¬ 
ren vom AMSDOS einfach ignoriert 
werden, d.h., daß die Verwaltung der 

21 Kilo Bytes Ihnen zugeteilt ist. Zum 
Bearbeiten des Sektors &4A benötigen 
Sie nun die Kommandos: BUFFER, 
READ, WRITE 

2. Schritt: 

Festlegen des Sektor READ/WRITE 
Buffers. 

Wenn die voreingestellte Sektoradres¬ 
se &9200 aus irgendwelchen Gründen 
nicht verwendbar ist, so nutzen Sie das 
Bufferkommando wie folgt: 

40 IBUFFER,&8E00 

Nun haben Sie einen 512 Bytes großen 


Raum zwischen den Adressen &8dff 
und &9000 geschaffen. 

3. Schritt: 

Schreiben und Lesen eines zehnten 
Sektors. 

Schreiben Sie den Sektorbuffer mit be¬ 
liebigen Werten voll, und bringen Sie 
anschließend das ganze auf Track 40, 
Sektor &4A. 

50 BYTE = 0 

60 FOR ADRESSE=&8E00 TO 
&8FFF 

70 POKE ADRESSE,BYTE 
80 BYTE=BYTE+ 1:IF 

BYTE > &FF THEN BYTE=0 
90 NEXT ADRESSE 
100 IWRITE,40,&4A 

Als nächstes wollen wir den Inhalt des 
Sektors einmal überprüfen, um zu se¬ 
hen, ob auch wirklich das geschehen 
ist, was wir uns vorgestellt haben. 

100 OFFSET = &200 
110 IBUFFER,&8C00 
120 IREAD,40,&4A 
130 FOR ADRESSE=&8C00 TO 
&8DFF 

140 IF PEEK( ADR ESSE) < >PEEK 
(ADRESSE+OFFSET) THEN 
PRINT“READ/WRITE ER¬ 
ROR“: END 
150 NEXT ADRESSE 
160 PRINT “DISK READ/WRITE 
CORRECT“ 

Sollten Sie nach Beendigung des Pro¬ 


gramms keine Fehlermeldung erhalten 
haben, können Sie davon ausgehen, daß 
alle zusätzlichen Sektoren verfügbar 
sind. 

Eine mögliche Anwendung wäre die 
Unterbringung von Daten, Maschinen¬ 
programmen usw. ohne die Inanspruch¬ 
nahme der Diskettenspeicherkapazität. 

So kann es sinnvoll sein, Maschinen¬ 
programme oder auch Daten in diese 
zusätzlichen Sektoren zu schreiben, 
ohne daß Kapazität verlorengeht. Dies 
ist in doppelter Hinsicht interessant, 
denn beinahe kein Diskettenkopierpro¬ 
gramm ermöglicht es, einen zehnten 
Sektor einzurichten, geschweige denn, 
zu kopieren. Bedenkt man, daß durch 
FORMAT ein fünffacher Schutz mög¬ 
lich ist, (Nutzung der Spuren 40—42, 
Belassen oder Einrichten einer Spur im 
nicht formatierten Zustand, Änderung 
der Sektomummem, der Sektorlänge 
und der Sektoranzahl), so macht man 
den Raubkopierem das Leben schwer. 
Übrigens kann man jetzt auch eine be¬ 
reits formatierte Spur in einen unforma¬ 
tierten Zustand zurückversetzen, indem 
man »unlogische« Parameter wählt. Als 
Beispiel IFORMAT,1,,9,0. 

Der FDC versucht nun, einen Sektor 
mit 65536 Bytes aufSpur 0 einzurich¬ 
ten. Dies führt unweigerlich dazu, daß 
er wichtige Daten überschreibt, und er 
den Sektor nicht mehr identifizieren 
kann. Hieraus ergibt sich auch der 
Grund, daß das Programm Parameter¬ 
fehler nicht überprüft. 

(Harald Lipinski/TM) 


Listing 

10 FOR adr0Sse = 8<9OOO TO &914E [15163 

20 READ byte* : byte$ = "i( M »byte* : byte = VAL(byt [30473 
e$ ) 

30 POKE adresse,byte:summe=summe+byte [20523 

40 NEXT adresse [8873 

45 IF summe<>35577 THEN PRINT"Fehler ln Da [2335] 
ta":END 

50 MEMORY &8FFF:CALL &9000 [9323 

60 NEW [3183 


1000 DATA 1,9,90,21,3B,90,C3,Dl,BC,ID,90,C [25943 
3,3F,90,C3 

1010 DATA BF,90,C3,F2,90,C3,6,91,C3,13,91, [15203 
C3,23,91,46,4F 

1020 DATA 52,4D,41,D4,52,45,41,C4,57,52,49 C1613] 
,54,05,42,55,46 

1030 DATA 46,45,D2,49,4E,49,D4,53,45,45,CB [23453 
, 0, FC,A6,9,90 

1040 DATA 6, 1B,B8,28,3,10,FB,C9,FE,0,C8,FE [2134] 
,1,C8,FE,2 

1050 DATA C8,3D,3D,32,AO,A8,47,4,3A,A2,A8, [33193 
32,49,91,3E.3A 

1060 DATA 32,A2,A8,3A,0,A7,5F,DD,56,0,DD,7 C28643 
E,2,32,A4,A8 

1070 DATA 21,4A,91,7A,77,23,23,23,23,10,F9 [20773 
,3A,AO,A8,47,21 


1080 DATA 4C,91,23,3A,A4,A8,77,23,23,23,23 [31053 
,10,F9,3A,AO,A8 

1090 DATA 47,26,0,6F,29,29,D5,11,4C,91,19, [14803 
11,2,0,DD,19 

1100 DATA Dl,2B,2B,2B,2B,DD,23,DD,23,DD,7E [22083 
,0,77,10,F2,3A 

1110 DATA 4C,91,4F,21,4A,91,DF,38,91,3A,49 [35943 
,91,32,A2,A8,C9 

1120 DATA FE,3,28,14,FE,2,CO,2A,47,91,DD,4 [20173 
E, 0,DD,56,2 

1130 DATA 3A,0,A7,5F,DF,3B,91,09,CD,31,91, [28673 
2A,47,91,DD,4E 

1140 DATA 2,DD,56,4,3A,0,A7,5F,DF,3B,91,DD [34753 
,36,0,A,CD 

1150 DATA 31,91,C9,FE,2,CO,2A,47,91,DD,4E, [18893 
0,DD,56,2,3A 

1160 DATA 0,A7,SF,DF,3E,91,C9,FE,1,CO,DD,6 [37643 
E, 0, DD,66, 1 

1170 DATA 22,47,91,C9,FE,2,CO,DD,7E,2,32,A [24713 
0,A8,DD,7E,0 

1180 DATA 32,A4,A8,C9,FE,1,C0,3A,0,A7,5F,D [36303 
D,56,0,DF,41 

1190 DATA 91,C9,DD,7E,0,DF,44,91,C9,52,C6, [26433 
7,66,C6,7,4E 

1200 DATA C6,7,63,C7,7,3,C6,7,0,92,0,0,0,0 [20513 
,0,0 
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Einzelheft-Bestellung 

Nachfolgende Ausgaben von Schneider CPC International sowie 
Sonderhefte sind noch vorrätig und können über den DMV Verlag be¬ 
zogen werden 

1 10/85 5, - DM 

□ 12/85 5,- DM 

{Die übrigen 85’er Ausgaben sind vergriffen) 

Bei einem Bestellwert von mindestens 15,- DM werden keine Porto- 
und Versandgebühren erhoben, bei einem Bestellwert unter 15,- DM 
werden 3,- DM Porto/Verpackung berechnet (Ausland 5,- DM 
Porto/Verpackung). Lieferung nur gegen Vorkasse (V.-Scheck). 


Bestellung Ausgaben (bitte ankreuzen): 

□ 1/86 

5, - 

DM 

□ 2/86 

5,- 

DM 

L 3/86 

5,- 

DM 

□ 4/86 

5,- 

DM 

□ 5/86 

6, - 

DM 

71 6/86 

6,- 

DM 

□ 7/86 

6,- 

DM 

H 8/86 

6,- 

DM 

□ 9/86 

6,- 

DM 

[710/86 

6, - 

DM 

□ 11/86 

6,- 

DM 

12/86 

6, - 

DM 

□ 1/87 

6, - 

DM 

□ Sonderheft 1/86 

14,- 

DM 

□Sonderheft 2/86 

14,- 

DM 

□ Sonderheft 3/86 

14,- 

DM 

Porto/Verpackung (nur bei einem Bestell wert unter 1 5 

- DM) 

DM 


Gesamtbetrag DM 

7J Einen Verrechnungsscheck in Höhe des Rechnungsbetrages 
habe ich beigefügt 


Unterschrift (bei Minderjährigen dos cesetzl Vertrete-s.) 


strapazierfähiger Ringbuchordner, 
Format DIN A4, Grundwerk ca. 400 
seiten, Bestell-Nr.: 2400, Preis: DM 92,— 

Alle 2-3 Monate erhalte ich Ergän¬ 
zungsausgaben zum Grundwerk mit 
jeweils ca. 120 Seiten zum seiten- | 
preis von 38 Pfennig. (Abbestellung 
jederzeit ohne Angabe von Gründen 
möglich.) 


Meine Anschrift: 


Name, Vorname 


Straße, Hausnummer 



mir bitte sofort 


Schneid» 


esjeää« 


0 Ja, senden Sie 

Mehr Erfolg mit 
Schneider 

CPC 464/664/6128 


PLZ, Wohnort 


Datum 


Unterschrift 


Bitte unterschreiben sie auch Ihre Sicherheitsgarantie, 
mit der Sie folgendes zur Kenntnis nehmen-. Sie haben das Recht, ihr 
angefordertes werk sowie jede nachfolgende Ergänzungsausgabe 
innerhalb von 10 Tagen ab Lieferung an den INTEREST-VERLAG, Industrie¬ 
straße 21,8901 Kissing zurückzusenden, wobei für die Fristwahrung das 
Datum der Absendung genügt. Sie kommen dadurch von allen Verpflich¬ 
tungen aus der Bestellung frei. 


iatum Unterschrift 


»Databox Einzelbestellung« 


CPC 

Highlights 1 
Highlights 2 

Ausgabe 8/85 
Ausgabe 9/85 
Ausgabe 10/85 
Ausgabe 11 185 
Ausgabe 1 2/85 


Kassette 

□ 14,- DM 

□ 14,- DM 

□ 14,- DM 

□ 14,- DM 

□ 14 - DM 

□ 14, - DM 

□ 14,- DM 


D Alle 1985er CPC- 
Databox-Kass. 
inkl. Highlights 
zum Gesamt¬ 
preis von 
70,- DM 


Ausgabe 1 /86 

□ 14,- 

DM 

Diskette 3' 



Ausgabe 2/86 

□ 14,- 

DM 

2/86 


24, - 

DM 

Ausgabe 3/86 

□ 14,- 

DM 

3/86 

□ 

24 - 

DM 

Ausgabe 4/86 

□ 14,- 

DM 

4/86 

D 

24 - 

DM 

Ausgabe 5/86 

□ 14,- 

DM 

5/86 

□ 

24, - 

DM 

Ausgabe 6/86 

ni4,- 

DM 

6/86 

n 

24, - 

DM 

Ausgabe 7/86 

□ 14,- 

DM 

7/86 

□ 

24,- 

DM 

Ausgabe 8/86 

□ 14,- 

DM 

8/86 

r. 

24,- 

DM 

Ausgabe 9/86 

□ 14,- 

DM 

9/86 

n 

24,- 

DM 

Ausgabe 10/86 

□ 14,- 

DM 

10/86 

□ 

24,- 

DM 

Ausgabe 11/86 

□ 14,- 

DM 

1 1/86 

□ 

24,- 

DM 

Ausgabe 12/86 

□ 14,- 

DM 

12/86 

□ 

24, - 

DM 

Ausgabe 1 / 87 

□ 14,- 

DM 

1/87 

□ 

24, - 

DM 

Ausgabe 2/87 

□ 14,- 

DM 

2/87 

□ 

24.- 

DM 

Joyce 










5/86 

n 

24,- 

DM 




6/86 

□ 

24, - 

DM 




7/86 

□ 

24,- 

DM 




8/86 

n 

24,- 

DM 




9/86 

□ 

'24,- 

DM 




10/86 

D 

24. - 

DM 




11/86 

a 

2^. - 

DM 




.12/86 

□ 

24,- 

DM 




1/87 

n 

24,- 

DM 

Joyce 2/8/ 



2/87 

□ 

24, - 

DM 


+ Porto/Verpackung iPorio/verp miano 3 . - dm ■■ Ausiano 5 dmi 


DM 


Gesamtbetrag 


DM 


Diesen Betrag bezahle ich mittels des beigefügten Verrechnungsschecks 
, i Ich bitte um Lieferung per Nachnahme (nur innerhalb der BRD) 

Bei Nachnahme kommt zum o g Betrag noch die Nachnahmegebühr hinzu 


Datum 


Unterschrift icei Minderjährigen desgesetzl Vertreters) 
















































Dieses speziell für Schneider CPC 464/664/6128 
entwickelte Nachschlagewerk gibt Ihnen: 

• hundertprozentig lauffähige Programme und 
Anwendungsbeispiele für Wirtschaft, Technik 
und Hobby 

Sie erhalten u a in Teil 5 menügesteuerte Pro¬ 
gramme, die Sie bequem mit einer Maus steuern 
können, sowie darauf abgesfimmte Programme 
zur Dafenauswertung und Dateiverwaltung. 

• Programmierkurse für BASIC, Assembler und 
Turbo-Pascal 

Der BASIC-Kurs inTeil 6 hilft Ihnen u a alle Mög¬ 
lichkeiten des BASIC-Interpreters zu nutzen Ne¬ 
ben Lokomotive BASIC 10 werden die Besonder¬ 
heiten von Lokomotive BASIC 1.1 erläutert. 

Das Programmieren in Maschinensprache er¬ 
möglicht Ihnen der Z 80-Assembler-Kurs 
Ein Programmier-Intensiv-Kurs in Turbo-Pascal 
zeigt Ihnen die richtige Vorgehensweise bei der 
Programmerstellung: Von den Methoden der 
Software-Erstellung bis zum effizienten Einsatz 
von Prozeduren und Funktionen 

• rechnerbezogene Programmierkurse für Grafik 
und Sound 

Schritt für Schritt vermittelt Ihnen der Grafikkurs in 
Teil 4 die grafischen Möglichkeiten Ihres CPC's 
und nebenbei entsteht ein hervorragendes Gra¬ 
fikprogramm mit Spriteeditor und allem was 
dazugehört 

Wie Sie Töne und Klänge aus dem S/D (Interface 
Device Controller) Ihres CPC's hervorlocken, 
zeigt Ihnen dieses Handbuch, 

• neue Tips, Tricks und Utilities 

wie CP/M-Utilities, Floppyroutinen, Programm- 
fransfer vom C 64 zum CPC, Simulation von 
CPC 664- und 6128 Befehlen auf dem CPC 464 

• detaillierte Systembeschreibungen 

Sie lernen Aufbau und Aufgaben sämtlicher Bau¬ 
steine kennen und natürlich auch das Zusam¬ 
menspiel dieser Komponenten. Mit diesem Wis¬ 
sen sind Sie selbst für „Hardware-Operationen", 
wie das Ersetzen vom PROMs durch EPROMs, 
bestens gerüstet. 

• Bauanleitungen für Hardwareerweiterungen 

wie Lighfpen oder Userport 

• Ergänzungsausgaben 

zum Grundwerk mit neuen Programmen, Routi¬ 
nen, aktuellen Hard- und Softwareerweiterun- 
gen, zusätzlichen Sprachkursen und praktischen 
Anwendungshinweisen 


Fordern Sie noch heute an: 

Mehr Erfolg mit Schneider CPC 464/664/6128 

strapazierfähiger Ringbuchordner, Format DIN A4, 
ca 400 Seiten, Bestefl-Nr. 2400, Preis: DM 92,-. 
Alle 2-3 Monate erhalten Sie Ergänzungsausgaben zum 
Grundwerk mit Jeweils ca 120 Seiten zum Seitenpreis van 
38 Pfennig (Abbestellung jederzeit möglich) 


Industriestraße 21 
D-8901 Kissing 
Tel 08233/23900 
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Beispiel der Symbol 
(Spielfigur) 

-Matrix 



Spielprogrammierung 
in Assembler 


Folge i 

Sicher kennt jeder, der sich mit Com¬ 
putern beschäftigt, sei er nun An¬ 
wender, Profi oder Freak, die folgen¬ 
de Situation: Man sitzt fasziniert vor 
einem Videospiel und fragt sich, wie 
es wohl funktioniert, daß die Spielfi¬ 
gur über das Spielfeld saust, woher 
die Monster »wissen«, wo sich ihre 
Gegner befinden, nach welchem 
Prinzip der Sound aus dem Hinter¬ 
grund erschallt, wie der Joystick 
(oder die Tastatur) abgefragt wird 
und auf welche Weise der originelle 
Spielfeldaufbau realisiert wurde. 

Diese Problematik ist es, mit der wir 
uns in den nächsten acht Folgen der Se¬ 
rie »Spieleprogrammierung in Assem¬ 
bler« auseinandersetzen wollen. Es soll 
für all die Leser, die der Programmie¬ 
rung in Maschinensprache in den 
Grundzügen mächtig sind, exempla¬ 
risch aufgezeigt werden, wie Schritt für 
Schritt ein professionelles Videospiel 
programmiert werden kann. Dabei 
werden zunächst alle auftretenden theo¬ 
retischen und praktischen Probleme 
analysiert und erörtert, um dann in As¬ 
sembler-Quelltext übersetzt zu werden. 


Am Ende jeder Folge wird der Quell¬ 
text um zusätzliche Bausteine erweitert, 
so daß das Resultat der Serie ein kom¬ 
plettes, voll lauffähiges Videospiel in 
Z80-Assembler ist. 

Dabei wurde nun die genaue Wahl des 
Spieles ein Problem. Einerseits sollten 
im Rahmen der Serie alle Standardpro¬ 
bleme bei der Programmierung von Vi¬ 
deospielen behandelt werden, anderer¬ 
seits durfte das Spiel nicht so komplex 
und umfassend werden, daß die Ziel¬ 
gruppe (nämlich alle Maschinenspra¬ 
cheprogrammierer, und nicht bloß 
Freaks und Profis) vom Verständnis der 
Spielstruktur und der verwendeten Lö¬ 
sungen weitgehendst ausgeschlossen 
blieben. Also haben wir uns für ein ty¬ 
pisches Spiel des »look ’n run«- 
Bereiches entschieden, wir haben es 
»HEKTIK« genannt. 

Die Spielfigur bei HEKTIK ist Karl- 
chen, ein Bauaufseher auf dem Plane¬ 
ten Sirius. Der Sirius ist ein Planet, in 
dessen Atmosphäre sich extrem wenig 
Sauerstoff befindet. Demgegenüber ist 
allerdings Karlchen ein Wesen, daß für 
die Aufrechterhaltung seiner Körper¬ 
funktionen unbedingt Sauerstoff benö¬ 


tigt. Nun gibt es auf dem Sirius noch 
die Monks, das sind bösartige Wesen, 
die ständig versuchen, Karlchen zu 
fressen und nebenbei auch noch den ge¬ 
samten Sauerstoffvorrat des Sirius auf¬ 
brauchen wollen. Und diese Kerle trei¬ 
ben sich nun besonders gerne auf Bau¬ 
gerüsten herum. Also muß Aufseher 
Karlchen ständig versuchen, diese Pla¬ 
gegeister unschädlich zu machen, in¬ 
dem er sie mit seiner Schaufel einbud¬ 
delt. Allerdings wollen die Monks sich 
natürlich nicht so einfach beerdigen las¬ 
sen und versuchen demzufolge, reißaus 
zu nehmen und Karlchen ihrerseits wie¬ 
der einzufangen und zu verspeisen. 

Soweit ein typisches Videospiel, wel¬ 
ches man auf jedem Computer antref¬ 
fen könnte. Anhand dieses Spieles soll 
nun Schritt für Schritt dargestellt wer¬ 
den, auf welche Weise an die unter¬ 
schiedlichen Probleme herangegangen 
werden kann, damit sie möglichst un¬ 
kompliziert in Assembler program¬ 
miert werden können. Die erörterten 
Probleme werden am Ende jeder Fol¬ 
ge in einen ausführlich dokumentierten 
Assembler-Quelltext übersetzt. Zum 
Erzeugen eines lauffähigen 
Maschinensprache-Moduls aus diesem 
Quelltext ist prinzipiell jeder 
Z80-Assembler verwendbar, der Quell¬ 
texte ins Maschinensprache-Format 
umwandeln kann. Wir selbst arbeiten 
mit dem HISOFT-Assembler. 

Diese erste Folge der Reihe beschäftigt 
sich mit dem Problemkreis »Spielfigur: 
grafische Darstellung und Kontrolle«. 
Wenn man sich einmal eine Spielfigur 
eines Videospieles ansieht, so wird sehr 
schnell deutlich, daß das äußere Er¬ 
scheinen der Figur nur durch eine be¬ 
stimmte Folge von gesetzten und nicht¬ 
gesetzten Punkten zustande kommt. 
Genau wie jeder einzelne Buchstabe, 
der auf einem Computermonitor darge¬ 
stellt wird, aus mehreren einzelnen 
Punkten besteht, gilt dieses Prinzip 
auch für eine grafische Spielfigur. Es 
muß zuerst vereinbart werden, welche 
Punkte gesetzt und welche gelöscht 
bleiben sollen, damit die Figur ein be¬ 
stimmtes Aussehen erhält.Nun tritt die 
Frage auf, auf welche Weise eine defi¬ 
nierte Figur am einfachsten auf dem 
Bildschirm dargestellt werden kann. 
Dabei kann man sich eine nützliche Ei- 
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Die benutzten Firmware-Routinen: 


SCR SET MDDE 
KM GET JOYSTICK 
KM READ CHAR 
TXT SET CURSOR 
TXT WR CHAR 


Einstellen des Bildschirmmodus 
Abfragen des Joystick—Status 
Ermitteln einer gedrueckten Taste 
Cursor auf x/y—Koordinate plazieren 
Zeichen auf dem Bildschirm ausgeben 


genschaft des Schneider-Betriebssy¬ 
stems zu Eigen machen. So dürfte ja 
aus der BASIC-Programmiererfahrung 
bekannt sein, daß es beim CPC mit Hil¬ 
fe des »SYMBOL«-Befehls ein leichtes 
ist, eigene Zeichen in den Schneider- 
Zeichensatz mit einzubinden. Es wird 
einfach eine bestimmte 8x8 Punktma¬ 
trix im Format von 8 Dezimalzahlen ei¬ 
nem bestimmten Tastaturcode zugeord¬ 
net unter dem sie dann abrufbereit ist. 
Diese nützliche Tatsache kann unserer 
Spielfigur Karlchen nun genauso zu 
seiner Erscheinung verhelfen: Es wer¬ 
den einfach zwei neue Zeichen defi¬ 
niert, welche übereinander gesehen die 
neue Spielfigur ergeben (ein Zeichen 
für die obere und eines für die untere 
Hälfte der Spielfigur). Diese beiden 
Zeichen können dann über die ganz ge¬ 
wöhnliche Zeichenausgaberoutine (in 
der Firmware TXT WR CHAR, 
&bb5d) auf den Bildschirm gedruckt 
werden, wo sie dann Karlchen zu sei¬ 
nem'ersten Leben verhelfen. Nun bleibt 
natürlich an dieser Stelle die Frage nach 
dem genauen Layout der Spielfigur 
(also der Zeichenmatrizen) offen. Wir 
haben nun ein Karlchen entworfen, das 
später über das Spielfeld huschen soll. 
Jede Zeile dieser nachstehend aufge¬ 
führten Punktmatrix wird in eine Dezi¬ 
malzahl übersetzt und in den Zeichen¬ 
satz eingebunden. Wir haben das am 
Beispiel des nach links sehenden Karl- 
chens einmal vorexerziert (Bild 1). Zur 


Erinnerung: die gesetzten bzw. nicht¬ 
gesetzten Punkte kann man sich als die 
einzelnen Stellen einer 8-stelligen 
Dualzahl vorstellen. Die erste Stelle hat 
den Wert 2T0, die zweite 2T1 usw. Nun 
wird jeder Punkt der Matrix genau ei¬ 
ner solchen Dualstelle zugeordnet. So 
erhält der achte Punkt ganz links den 
Wert 2T7 (=128), der siebte den Wert 
2T6 (=64) usw.. Wenn nun alle Werte 
an allen Stellen, an denen ein Punkt ge¬ 
setzt wurde addiert werden, ergibt sich 
daraus eine Dezimalzahl im Bereich 
von 1 bis 255. Jede einzelne dieser Zah¬ 
len stellt dann genau eine Kombination 
aus gesetzten bzw. nichtgesetzten Punk¬ 
ten dar. Die jeweils acht Zeilen (also 
acht Dezimalzahlen) einer Hälfte wer¬ 
den zu einem Charakter zusammenge¬ 
faßt, und zwar zu CHR$(228) und 
CHR$(229). Diese Vereinbarung ist in 
Maschinencode relativ einfach zu for¬ 
mulieren. Und zwar wird in einem Vek¬ 


tor des Betriebssystems angegeben, von 
welchem Zeichen an selbstdefinierte 
Character folgen (&b294 für 464, 
&b734 für 664 und 6128) und in einem 
weiteren Vektor verzeichnet, wo sich 
das dazugehörige Zeichensatzsegmet 
befindet (&b296 für 464, &b736 für 
664 und 6128). In unserem Falle ist das 
die Tabelle SYMBOL ab Zeile 2360 
des Quelltextes. In dieser Tabelle wer¬ 
den die Punktmatrizen der Spiel figur¬ 
teile eingetragen, damit sie dem Zei¬ 
chensatz zur Verfügung stehen. 

Nun wird jedem aufmerksamen Leser 
beim Blick auf diese Tabelle im Quell¬ 
text auffallen, daß für unser Karlchen 
nicht nur zwei Zeichen (nämlich Ober¬ 
und Unterseite) definiert wurden, son¬ 
dern insgesamt 10 neue Zeichen in den 
Zeichensatz eingebaut wurden. Diese 
Tatsache leitet zu unserer nächsten Pro¬ 
blematik über. So ist es ja noch relativ 
einfach, eine unbewegliche, statische 


1000 DATA &0E 1 &00,&CD 1 &15,&B9,&7C,Ä21 1 %94, £25713 

4B2,411, 496, 4B2, 4B7, &28, 406, 421, 1515 

1010 DATA 434, 4B7,411,436,4B7,43E,4DD,477, C31523 

4EB, 411,8.02,8rAl, 473,8.23,472, 43E, 1632 

1020 DATA 401,4CD,40E,4BC,421,416,414,422, t29093 

4FD,4A0,403,4C0.4A0,4CD.424,4BB, 1907 

1030 DATA 4B7,420,405,4CD,409,4BB, 430,4F5, C40393 

42A,4FD,4A0,4CB,447,426,42A, 47D, 1650 

1040 DATA 4FE,401,428,4E9,4CD,4E4,4A0,42D, [34821 

43A,401,4A1,4EE,401,432,401,4A1,1837 

1050 DATA 401,4DD,4DE,428,403,401,4DF,4E0, £34783 

4C5,478,4CD,4EE,4A0,4C1,42D, 479,2214 

1060 DATA 4CD,4EE,4A0,422,4FD,4A0,4C3,4E1, £39953 

4A0,4CB,44F,428,429,47D,4FE,418,2396 

1070 DATA 428,4BB,4CD,4E4,4A0,42C,43A,401. [35073 

4A1,4EE,401,432,401,4A1,401,4DD,1757 

1080 DATA 4DE, 428,403,401,4DF, 4E0,4C5, 478, [32733 

4CD,4EE,4A0,4C1,42D,479,4CD, 4EE,2435 

1090 DATA 4A0, 422,4FD,4A0,418,44B,4CB,457, £40213 

428,422,47C,4FE,401,428,48E,4CD,1836 

1100 DATA 4E4,4A0, 425,43A,4FF,4A0,4EE,401, £30053 

432,4FF,4A0,406,4E5,480,4CD,4EE,2408 

1110 DATA 4A0,42D,43E,4E4,4CD,4EE,4A0,422, £44253 

4FD,4A0,418,425,4CB,45F,428,421,1977 

1120 DATA 47C,4FE,428,4CA,42D,4A0,4CD,4E4, £35953 

4A0,424,43A,400,4A1,4EE,401,432,1962 

1130 DATA 400,4A1,406,4E2,480,4CD,4EE,4A0, £38633 

42D,43B,4E1,4CD,4EE,4A0,422,4FD,2346 

1140 DATA 4A0,4C3,42D,4A0,43E,420,4CD,4EE, £27323 


4A0, 42C,4CD,4EE,4A0,4C9,4E5,4C5,2531 

1150 DATA 4F5,4CD,475,4BB,4F1,4F5,4CD,45D, £27033 

4BB,4F1,4C1,4E1,4C9,400,400,400,2585 

1160 DATA 400,400,400,41C,43E,43E,43E,41C, £37071 

419,419,47E,498,498,418,424,427, 821 

1170 DATA 420,400,400,438,470,470,470,438, £37973 

498,498,47E,419,419,418,424, 4E4, 1476 

1180 DATA 404,403,438,470,474.476,470,438, £31883 

408, 478,4FC, 4BB, 438,438,4F8, 480, 1668 

1190 DATA 484,403,4FC,4BB,438,438,428,448, £30393 

428,40E,410,43E,42E,46E,43E,410,1188 

1200 DATA 40C.41E.43F,4DD,410,410, 41F, 431, £27493 


421,400,43F,4DD,41C,410, 414,412,1065 

1210 DATA 414,430,68 £4253 

1220 MEMORY 49FFF £1343 

1230 datenanzahl=Q: zei lensumine=0: aktuellez £38803 

eile=1000 

1240 FOR adresse=4A000 TO 4A151 £16253 

1250 READ byte:datenanzahl=datenanzahl+l £15893 
1260 zeilensunnne=zeilensumine+byte £22183 

1270 POKE adresse,byte £6863 

1280 IF datenanzahl<16 AND adresse<4A151 T £27353 
HER 1320 

1290 READ pruefsumme £9253 


1300 IF pruefsummeOzeilensunune THEN PRINT £5102) 
"Fehler in Zeile:" ;aktuellezeile 
1310 aktuellezeile=aktuellezeile+10:zeilen £47253 
summe=0:datenanzahl=0 

1320 NEXT adresse £8873 

1330 CALL 4AOOO £6373 
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«UCK <M JAPAN 


I NL-10 


220V ~ 50760Hz 65W 


Funkentstört nach VFG 1046/84 der 


STAR MICRONICS CO., LTD. 


1 Postleitgobiet 1000 ~| 

1000 Berlin 
DPS Microland 

(030) 24 7245 
DSI (030) 394 7015 
pandasoft (030) 3104 23 
TCV Berlin (030) 882 6804 
UNIONZEISS (030) 32 3061 

I PostleltgebleTiröoÖ " | 

2000 Hamburg 
BDB Büro (040) 251605-0 
Createam Microcomputer 
(040) 6416473 
GMA (040) 2512416 
MOP (040)233065 
PC-Partner (040) 2208090 
omnidata (040) 5226051 
RADIX (040) 441695 
2050 Hamburg 80 
technlk + deslgn 
(040) 7211255 
2057 Reinbek 
Shogun Computerstudio 
(040) 7 22 5106 

2080 Pinneberg 

Schwartz (04101) 23311 

2105 Seevetal 1 
Zimmermann EDV-Beratung 

(04105) 52068 

2120 Lüneburg 
Sienknecht 

(04131) 46122 

2190 Cuxhaven 

Elektro-Data (047 21) 51288 
2200 Elmshorn 
Backauf Computer 
(04121) 1316o 73642 
2210 Itzehoe 
Stöven (04821) 3348 
2250 Husum 
Bürotechnik Nord 
(04841) 6 2036 
2300 Kiel 
franke fimöhring 
(0431)98060 


2300 Kiel 

MCC-Micro Computer Christ 
(0431) 567041 
Reese (04301) 6891-0 
2330 Eckernförde 
Tonacord-Tontechnik ECM 
(04351) 4039 
2350 Neumünster 
Ing. Büro MOEBIUS 
(04321) 71623 
micro-computer-schütte 
(043 21) 14001 

2390 Flensburg 

ECL (04 61) 281810 28193 

2400 Lübeck 1 
Jessen & Lenz 

(04 51) 70 50 30 o 705151 

2800 Bremen 1 

MEISTER (04 21) 499920 
WEBER (04 21) 490019 

2848 Vechta 

W. Wälder & W. Manske 
(04441) 7871 
2850 Bremerhaven 
Wilhelm Berding (04 71) 120 
2900 Oldenburg 
COMTEXT (0441) 27783 

2940 Wilhelmshaven 
Radio Freese (0 44 21) 2 60 51 

2950 Leer 
S + F Datentechnik 

(0491) 4589 

2960 Aurich 

bents büro (04941) 17040 
2970 Emden 
COMPUTER-TECHNIK¬ 
EMDEN (04921) 290 30 
Theo Janssen Datensysteme 
(04921) 31969 


1 Postleitgebiet 3000 | 

3000 Hannover 

Geddert (0511) 704525 
trend DATA (0511) 16 60 50 
Saturn Hansa (0511) 455001 


3012 Langenhagen 

Leymann CVG (0511) 7805-1 

3100 Celle 

Stark-BTX-Comp. 

Fachhandel (05141) 33207 

3119 Römstedt 

ACI Amalienhof Computer 

Institut (058 28) 1013 

3250 Hameln 

Witte (05151) 7595 

3300 Braunschweig 

Computer Studio 

(0531) 3332 77 

DPS Microland (0531) 13018 

3380 Goslar 

microLAND (0 53 21) 46 86 

3400 Göttingen 

HS-Computerladen 

(0551)44204 

Retron (0551) 9040 

3470 Höxter 

Schidlack & Sohn 

(0 5271) 1223 

3500 Kassel 

Hermann Fischer 

(0561) 700000 

3550 Marburg/Lahn 

Ahrens-Computer-Center 

(06421) 20051 

| Postleitgebiet 4000 | 

4000 Düsseldorf 1 
Data-Becker (0211) 310010 
Bürokommunikation 
I. Rennen (0211) 307014 
H. Rennen (0211) 306098 
4019 Monheim 
CO-SA Computer + Systeme 
(02173) 396119 

4040 Neuss 

Unlcomp (02101) 274064 

4050 Mönchengladbach 

Symlc (02161) 18751 


4100 Duisburg 
NSE-Datensysteme 

(0203) 666091 
H. Rennen (02 03) 2 49 26 

Dieter Reising 

(0203) 77 4081 

4154 Tönisvorst 1 
Schröter & Suchanek 

(0 2151) 7920 

4178 Kevelear 

Gebr. Vogel (02832) 3689 

4190 Kleve 
Feldmann & Luft 

(0 2821) 91038 

4200 Oberhausen 
Harpering Industrie- 
Elektronik (0208) 895569 
Kamp Bürosysteme 
(0208)890086 
4280 Borken 
HI-TRONIC (02861) 63336 
4300 Essen 

H. Rennen (0201) 237139 

RSS-Computersysteme 
(0201) 789908 

4400 Münster 
GAO Computerhaus 
(0251)4 4396 

4401 Altenberge 
Möllers Datensysteme 
(02505) 544 

4408 Dülmen 

STO Datentechnik Elek. 

(02594) 67 00 

4422 Ahaus 

OCB Org. & Comp. Ber. Gesell. 
(02561) 5021 
4440 Rheine 
Famos Filiale Rheine 
<059 71)82676 
4450 Lingen 

Bürotechnik (0591) 4 9077 


4500 Osnabrück 

HDS Computer (0541) 68018 
Genck (0541) 5 70 77 
4600 Dortmund 1 
City Elektronik 
(0231) 528033 
CC Computer Studio 
(0231) 528184 

4620 Castrop-Rauxel 

Schuster (02305) 27 70 
4630 Bochum 
HEW (0234) 680515 
Höhne (02 34) 5960 26 
4650 Gelsenkirchen 
Vollrath (0209) 209291 
4750 Unna 

M. Schwartz (02303) 15022 

4770 Soest 
Dahlhoif (02921) 12582 
4800 Bielefeld 
CSF-Comp. & Software 

(0521) 61663 

1 Postleitgebiet 5000 

5000 Köln 

Autosoft (02 21) 171005 
Büro Maschinen Braun 
(0221) 219171 
DPS Microland 
(0221) 1324 56 
Saturn Electrohandel 
(0221) 16160 
5100 Aachen 

DPS Microland (0241) 23868 
5120 Herzogenrath 
RODA-SOFT (0 24 06) 7 9100 
5130 Geilenkirchen 
CSB-System (0 24 51) 62 50 
5160 Düren 
Räbiger (02421) 10606 
5180 Eschweiler 
Multilog (02403)20021 
5240 Betzdorf/Sieg 


5300 Bonn 1 

HDM (02 28) 612060 

5309 Meckenheim 
Betriebsberatung Stuch 

(02225) 13500 

5419 Dörholz/Werlenbach 

DV Service • (02684) 7138 

5461 St. Katharinen 
Computer-Systeme Klepper 

(02645) 540 

5500 Trier 

NovoComp (0651) 4 2244 

5600 Wuppertal 
Brosius & Köhler 

(0202) 64 70 57 
HEW (0202) 303196 

Hansa-Projekt West 

(0202) 449408 

5632 Wermelskirchen 1 
DPS Microland 

(02196) 2095 

5810 Wltten-Herbede 

HEW (02302) 7 73 53 

5880 Lüdenscheid 
OBE Bürosysteme 

(023 51) 2 5232 
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6000 Frankfurt 
GES-Computer 
(069) 462041 
Henneveld (069) 740676 
Saturn Hansa (0 69) 40 5010 
Spieß Hergt&Co. 

(069) 67 6014 
UNIONZEISS (069) 40871 

6057 Dietzenbach 

Peter Griese (060 74) 28679 

6080 Groß-Gerau 
Elze & Henninger 

(06152) 40023 

6090 Rüsselsheim 
DELTA-Rechenzentrum 


4100 Duisburg 
HEW Computer Vertrieb 

(0203) 330343 


4460 Nordhorn 
Nino Engineering 

(05921) 9123 71 


BYTE ME COMPUTER¬ 
SYSTEME (02741) 23537 


(06142) 41025 

Distribution: ÖSTERREICH: 1070 Wien, ZEMA Computer (02 22) 961519 • 1131 Wien, Kanitzer (0222) 822166/82 7393 
















Autorisierte 
Star-Fa<hhändler 
stehen zu ihrem Service - 
unter Garantie! 

Lassen Sie sich nicht einfach von jedem x-beliebigem Händler einen Drucker 
verpassen. Mit Billigprodukten aus der Grauzone stehen Sie im Garantiefall im Regen. 

Die autorisierten Star-Fachhändler dagegen verfügen nicht nur über das nötige 
Know-how, Ihr spezielles EDV-System zu vervollständigen, sie allein bieten neben der 
qualifizierten Beratung auch den fachgerechten Service für die gesamte Star Drucker-Palette. 

Und nur die von uns sorgfältig ausgewählten, nachweislich autorisierten Star-Fach¬ 
händler bieten die volle Star-Garantieleistung - das zahlt sich für Sie aus. Mit promptem 
Service und ohne komplizierte Versandaktionen. Star-Qualität ist ablesbar: an der Original- 
Seriennummer auf dem Typenschild. Nur Drucker mit diesem Typenschild unterliegen 
den Star Garantiebestimmungen, sind FTZ zugelassen und verfügen über das richtige Netzteil. 
Das erspart Ihnen teure Nachprüfungen und Ausfälle. Übrigens: zu einem in Deutschland 
gekauften Star-Drucker gehört selbstverständlich ein kostenloses deutsches Handbuch. 

Achten Sie also nicht nur auf das Star-Fachhändler- und Service-Center-Zeichen, 
achten Sie auch auf das Typenschild. Nur dann ist gewährleistet: Mit einem Star ist alles klar. 


SERVICE-CENTER 


Autorisierter 

Star-Fochhändler 


6100 Darmsladt 

Henneveld (06151)264 28 
Heim (06151) 56057 
6200 Wiesbaden 
Henneveld (06121) 1660 
DPS Microland 
(06121) 39088 

6240 Königstein 

KFC-Computer (06174) 3033 

6250 Limburg/L. 

Pauly (064 31)26021 
6300 Gießen-Wieseck 
SHW (0641) 5 7294 
6350 Bad Nauheim 
Computer Professional 
(06032) 2088 
6370 Oberursel 
KD Computer Forum 
(0 61 71) 54021 
6400 Fulda 

Steinweller (06 61) 7 50 51 
6450 Hanau 1 
Göbel (06181) 24348 
6457 Maintai 
Dötsch (0 6181) 491068 
Landoit-Computer 
(06181)4 5743 
„plan mit" (06109) 61028 
6500 Mainz 1 
DPS Microland 
(0 6131) 232417 
Henneveld (06131) 24011 
6520 Worms/Rh. 

ORION Computersysteme 
(06241) 67 57o 67 58 
6560 Idar-Oberstein 1 
Ringfoto Pullig 
(067 81) 2 24 44 

6600 Saarbrücken 

Shop 64 (0681) 39 7677 
Wlko (0681) 63444 

6630 Saarlouis 
Computer Studio Saarlouis 

(06831) 2060 

Shop 64 <06831)48433 


mir 



der ComputerDrucker 



6650 Homburg/Saar 

Shop 64 (06841) 63333 

6680 Neunkirchen 

Shop 64 (06821)24717 

6730 Neustadt/Weinstr. 

ICR (06327) 390 

6740 Landau 

Computer Software Vertrieb 

(06341) 86014 

6750 Kaiserslautern 
Jung (0631)53566-0 
Kirch (0631) 29022 

6790 Landstuhl 
Computer Point 

(06371)18866 

6800 Mannheim 
Computer-Center am Hbf 

(0621) 20983 
Dialog (0621) 2 2954 

Phora-Wessendorf 
GmbH & Co. KG (0621) 4661 

6831 Plankstadt 

Geosoft (06202)2 5980 

6832 Hockenheim 
G-DAS Datenservice GmbH 

(06205)4011 

6980 Wertheim 

Roth Elektronik (09342) 8129 

6900 Heidelberg 
Jacom Computertechnik 

(062 21) 410514 

6990 Mergentheim 

Rachel (07931) 51027 


| Postleitgeblet 7000 | 

7000 Stuttgart 

Dontenwill (0711) 294665 
Kubier (0711) 610651 

7032 Sindelfingen 
Kubier (0 7031)82259 

7060 Schorndorf 

CSB (07181) 3122 

7107 Neckarsulm 

GAI (07132)37188 

7140 Ludwigsburg 

GCA (07141)90048/49 

7150 Backnang 
Micro-Computer-Studio 

(07191) 62051 

7170 Schwäbisch Hall 11 

D.O.S. (0791)517 36 

7274 Haiterbach 

GCA (074 56) 832 

7317 Wendlingen 

GK-Elektronik (07024) 51848 
7417 Pfullingen 
Rehm (0 7121) 744 36 

7470 Albstadt 
Mattes Computersysteme 
(0 7432) 13316 
7475 Meßstetten 1 

Scheurer (0 74 31) 612 80 

7500 Karlsruhe 
Papierhaus Erhardt 

(07 21)23925/27 

7520 Bruchsal 

Hifi Video Computer Jöst 

(0 72 51) 103091 


7527 Kraichtal 

D + G (07250) 8684 

7530 Pforzheim 

Bürocentrum Pforzheim 

(07231) 320 61 

DM Technik (0 72 31) 139 39 

7550 Rastatt 

Bürotechnik Rieger 

(072 22) 3 5085 

7600 Offenburg 

Mangei (0781) 7 0814 

7700 Singen 

Ttöndle Elektronik 

(0 7731)64433 

7730 VS-Schwennlngen 

BUS (077 20) 38071 

7740 Triberg 

RCO Kurt Braun 

(0 77 22) 5353 

7750 Konstanz 

Elektronik Obser 

(07531)22929 

7835 Tenolngen 

EDV-Service Fell 

(0 7641) 1058+1059+1011 

7851 Binzen 

Resin Büro mit System 

(07621)66010 

7880 Bad Säckingen 

Dontenwill (07761) 3093 

7890 Waldshut-Tiengen 1 

Hettler-data-Service 

(0 77 51) 3094 

7900 Ulm/Donau 
Computer Studio Wecker 

(0731) 28076 

7980 Ravensburg 
Computer Grahle 
(07 51) 15955 
7987 Weingarten 
Büroorganisation Weiß 
(07 51)4 3080 


8000 München 

A.C.O. (089) 7140905 
Dontenwill (089) 598701 
Ludwig (089) 3113066 
Saturn Hansa (089) 510850 
Seemüller (089) 59 6667 
Söllner (089) 7 60 7061 
Systemhaus Piper & Partner 
(089)8340001 
Stubner (089) 5197-0 

8051 Palzing 
ECD-Computertechnik 

(08167) 84 80 

8070 Ingolstadt 

Büro Wenger (0841) 65021 

8121 Polling 

ABS (0881) 34 31 

8170 Bad Tölz 

Elektronlc-Center 

(08041)41565 

8130 Starnberg 
Computershop McMicro 

(06151) 13888 

8220 Traunstein 
Computer Studio Friedrich 

(0861) 147 67 

8229 Laufen 
Wendisch Computer 

(08682) 1600 

8230 Bad Reichenhall 
Rubertigau Bürosysteme 
Angerer (08651) 3016 

8300 Landshut 

Büro Dallmer (0871) 21062 

8340 Pfarrkirchen 

CLG (08561) 60 54 

8391 Perlesreut 
Eschcomp-System 

(08555) 1390 

8395 Hauzenberg 
Computer Shop 

(08586) 2174 


8400 Regensburg 

C-Soft (0941) 83986 
EPA (09 41) 4 50 58 

8450 Amberg 

Top-Video 96(096 21) 14136 

8500 Nürnberg 
Habermann & Harder 

(0911)37183 

8620 Llchtenfels 

H.O. Schulze (09571) 1088 

8650 Kulmbach 

Hanft (09221)65626 

Hippolyt Thum Büroorg. 
(092 21) 64640 

8670 Hof 

Hanft Kopiertechnik 
(09281) 86389 
8700 Würzburg 
Computer Martin 

(0931) 165 58 
Schöll (0931) 50488 

8750 Aschaffenburg 
IS + S Informationstechnik 
(06027) 1285/86 
Viktor Wlllgerodt 
(06021) 21375/79 
8860 Nördlingen 
Kutzschbach Elektronik 
(090 81) 86022 
8880 Dillingen/Donau 
Reitzner (090 71) 2060 
8898 Schrobenhausen 
EOP (0 8252) 7031 
8900 Augsburg 
Maurer & Partner 
(08 21) 519382 
8940 Memmingen 
Computerladen 
(08331) 5942 
8960 Kempten 
Staehlin (08 31) 28001 
Welss (08 31)13017 
8974 Oberstaufen 
Büromarkt Mohr 
(08386) 7111 


3400 Klosterneuburg, Data Print (02243) 7565 - SCHWEIZ: 5620 Bremgarten, Peco AG, (0 57) ’30305 
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Figur auf den Bildschirm zu bringen. 
Schwieriger wird es da schon bei der 
Bewegung dieser Spielfigur, der soge¬ 
nannten »Animation«. Um dem Grund¬ 
problem jeder Animation, nämlich der 
Frage »Wie bewegt man eine Spielfigur 
möglichst flüssig auf dem Bildschirm 
hin und her«, auf die Schliche zu kom¬ 
men, sollte man sich noch einmal ein 
ganz einfaches Beispiel vergegenwärti¬ 
gen, welches nahezu jedem häufig be¬ 
gegnet: Den Film. Ein Film, oder bes¬ 
ser noch, ein Zeichentrickfilm bietet 
ein ausgezeichnetes Beispiel dafür, wie 
aus einem unbeweglichen Gegenstand 
bzw. einer unbeweglichen Figur ein an¬ 
sprechendes, bewegtes Ding gemacht 
wird. Die Zauberformel hierzu ist das 
Auflösen einer Bewegung in ihre Ein¬ 
zelbilder. Damit zum Beispiel der ro¬ 
sarote Panther einen Fuß vor den ande¬ 
ren setzen kann, wird diese Bewegung 
des Fußes in eine Vielzahl von Einzel¬ 
bildern aufgesplittet. Jedes dieser Bil¬ 
der stellt einen immer weiter fortge¬ 
schrittenen Bewegungszustand dar, der 
durch eine ausreichend schnelle se¬ 
quentielle Abfolge der Bilder den Ein¬ 
druck entstehen läßt, es werde eine 
kontinuierliche Bewegung dargestellt. 
Genau das gleiche soll mit den unter¬ 
schiedlichen Bewegungen unserer 
Spielfigur Karlchen geschehen. Karl- 
chens Bewegungen werden in unter¬ 
schiedliche Einzelbilder aufgespaltet, 
die dann in schneller Reihenfolge hin¬ 
tereinander den Effekt einer kontinui¬ 
erlichen Bewegung hervorrufen. Natür¬ 
lich können wir die Bewegungen unse¬ 
res Karlchens nicht mit denen eines 
Zeichentrickfilms vergleichen, erstens 
nicht, weil wir für einen solch perfek¬ 
ten Bewegungsablauf eine viel größere 
Menge an Einzelbildern benötigen 
würden, als auf dem CPC überhaupt 
verfügbar sind, zweitens nicht, weil wir 
für die haarfeinen Unterschiede in der 
Bewegung eine viel exaktere und detail¬ 
liertere Auflösung benötigten und drit¬ 
tens nicht, weil es einfach viel zu viel 
Mühe machen würde, die Bewegungen 
so aufzuschlüsseln. Deshalb sollten für 
unser Karlchen 10 verschiedene Einzel¬ 
bilder der Bewegung ausreichen. Jedes 
dieser Einzelbilder stellt eine Karlchen- 
hälfte dar. Dieses Prinzip soll nun ein¬ 
mal kurz erläutert werden, für die Be¬ 
wegung nach rechts bleibt die Stellung 


Paaa 

error*» 

00 



A000 


1000 

org 

£a000 

AOOO 

0E00 

1010 

ld 

c, 0 

A002 

CD15B9 

1020 

call 

£b915 

A005 

7C 

1030 

ld 

a,h 

A0O6 

2194B2 

1040 

ld 

hl,£b294 

A009 

1196B2 

1030 

ld 

de,£b296 

AOOC 

B7 

1060 

or 

a 

AOOD 

2B06 

1070 

Jr 

z,cpc464 

AOOF 

2134B7 

1000 

ld 

hl,£b734 

A012 

1136B7 

1090 

ld 

de, £b736 

AO13 

3EDD 

1100 cpc464i 

ld 

a, 221 

A017 

77 

1110 

ld 

(hl),a 

A01B 

EB 

1120 

BX 

de,hl 

A019 

1102A1 

1130 

ld 

de,aymbol 

A01C 

73 

1140 

ld 

(hl),e 

A01D 

23 

1150 

inc 

hl 

A01E 

72 

1160 

ld 

(hl),d 

A01F 

3E01 

1170 

ld 

a, 1 

A021 

CDOEBC 

1180 

call 

£bcOe 

A024 

211814 

1190 

ld 

hl,£1410 

A027 

22FDA0 

1200 

ld 

(y),hl 

A02A 

C3C0A0 

1210 

JP 

rweit 

A02D 

CD24BB 

1220 Joyati» 

call 

£bb24 

A030 

B7 

1230 

or 

a 

A031 

2003 

1240 

Jr 

nz,teat 

A033 

CD09BB 

1250 

call 

£bb09 

A036 

30F3 

1260 

Jr 

nc,Joyati 

A03B 

2AFDA0 

1270 teati 

ld 

hl,<y) 

A03B 

CB47 

1200 

bit 

0,a 

A03D 

2B2A 

1290 

Jr 

z, ab 

A03F 

7D 

1300 

ld 

a,l 

A040 

FE01 

1310 

cp 

1 

A042 

2BE9 

1320 

Jr 

z,Joyati 

A044 

CDE4A0 

1330 

call 

loeach 

A047 

2D 

1340 

dec 

1 

AO40 

3A01A1 

1330 

ld 

a, (ho) 

A04B 

EE01 

1360 

xor 

1 

A04D 

3201A1 

1370 

ld 

(ho) ,a 

A030 

01DDDE 

1380 

ld 

bc,£dedd 

A033 

2003 

1390 

Jr 

z,goonl 

A053 

OIDFEO 

1400 

ld 

bc,£aOdf 

AO50 

C3 

1410 goonli 

puah bc 

A039 

70 

1420 

ld 

a,b 

A03A 

CDEEAO 

1430 

call 

aetcur 

A03D 

CI 

1440 

POP 

bc 

A03E 

2D 

1430 

dec 

1 

A03F 

79 

1460 

ld 

a,c 

A060 

CDEEAO 

1470 

call 

aetcur 

A063 

22FDA0 

1400 

ld 

<y),hl 

A066 

C3E1A0 

1490 

JP 

weiter 

A069 

CB4F 

1300 ab: 

blt 

1 ,a 

A06B 

2829 

1510 

Jr 

z.linka 

A06D 

7D 

1520 

ld 

a,l 

A06E 

FE1B 

1530 

cp 

24 

A070 

28BB 

1340 

Jr 

z, Joyati 

A072 

CDE4A0 

1530 

call 

loaach 

A073 

2C 

1360 

inc 

l 

A076 

3A01A1 

1570 

ld 

a,(ho) 

A079 

EE01 

1500 

xor 

1 

A07B 

3201A1 

1390 

ld 

(ho) ,a 

A07E 

01DDDE 

1600 

ld 

bc,£dadd 

AOB1 

2003 

1610 

Jr 

z,goon2 

A0B3 

OIDFEO 

1620 

ld 

bc,£aOdf 

A0S6 

C5 

1630 goon2» 

puah bc 

A087 

70 

1640 

ld 

a,b 

AOBB 

CDEEAO 

1630 

call 

aetcur 

AOBB 

CI 

1660 

pop 

bc 

AOBC 

2D 

1670 

dac 

1 

AOBD 

79 

1600 

ld 

a, c 

A08E 

CDEEAO 

1690 

call 

aetcur 


des Kopfes immer gleich: der Blick 
geht nach rechts. Für die Beine wurden 
hier zwei Stellungen vorgesehen: Sta¬ 
tus 0 und Status 1. Mit drei Zeichen 
können also zwei Rechtsbilder darge¬ 
stellt werden. Das gleiche gilt für die 
Bewegung nach links, auch hier können 
mit drei Zeichen zwei unterschiedliche 
Bewegungsbilder dargestellt werden. 

Also verbleiben die restlichen vier Zei¬ 
chen für die Bewegungen nach oben 
und nach unten. Dazu ist zu sagen, daß 
eine Bewegung nach oben genau der 
Bewegung nach unten entspricht, eben 
nur die Bildsequenz in umgekehrter 


I -Programmatartadreaa* 

I -Ermitteln der ROM-Veraion durch 
I Aufruf von KL PROBE ROM und Laden 
I de* Akkumulator* mit Veraionanumnter 
I -HL mit £b294 und 
I DE mit £b296 ladan 
I -fall« Veraion 0 (also ein 464), 
l dann waitermachen, anaonaten 
I HL mit £b734 und 
I DE mit £b736 ladan 
I -CHR*<221> aia arataa Zalchan der 
l aalbatdaflnlarten Matrix angeben 
I -Auatauachan von HL und DE und Ladan 
I von DE mit dam Matrixtaballenanfang 
l aowi* Bpaiehern dar 
I neuen Adreaaa in den 
i zuataandlgan BetriebBayatemvektoren 
i -MODE 1 (40 Zeichen/Zeil*) durch 
j Aufruf von BCR SET MODE einatellen 
l -Koordinaten dar Spielfigur 
I (x-H*20 und y»L«24> abapeichern 
l und auf dam Blldachirm daratellan 
I -Durch Aufruf von KM SET JOYSTICK 
l abfragen daa Joyatick-Btatua 
I -Wann nicht im Ruhezuatand *>-> taat, 

I aonat Aufruf von KM READ CHAR, wann 
l keine Taate gedrueckti wiederholan 
l -Koordinaten holen 
I -Joyatick hochgedruackt ? 

I -Wann nicht ■*■> ab 
I -Wenn aich die Spielfigur 
i ln der 1. Zelle befindet, 

I Sprung zu joyati 
I -Alt* Poaition loeachan 
I -y-Koordinata um 1 vermindern 
I -Aua dem alten Bewegungazuatand 
I den neuen Bawegungaatatua errechnen 
l und wieder abapaiehern 
I -BC mit Zeichen 222 und 221 laden, 
i fall* der neu# Statua"0, anaonaten 
; BC mit Zeichen 224 und 223 ladan 
I -Regiatar BC aiehern und 
; Zeichen B an der x/y-Poaition 
l auageben 

j -BC auf alten Wert Betzen 
I -y-Koordlnate um 1 vermindern und 
I Zeichen C an der x/y-Poaitlon 
I auageben 

I -neue Koordinatan abspeichern und 
l Sprung zur Routine weiter 
I -Joyatick abwaarta gedrueckt ? 

I -Wenn nicht ■■> link* 
j -Wenn sich die Splelfigur 
I ln der 24. Zeile befindet, 

I Sprung zu Joyati 
I -Alt* Poaition loeachen 

t -y-Koordinat* um 1 erhoehen 
l -Aua dem alten Bewegungazuatand 
1 den neuen Bewegungaatatus errechnen 
I und wieder abapeichern 
5 -BC mit Zeichen 222 und 221 laden, 

1 fall* der neue Statu*«0, anaonaten 
i BC mit Zeichen 224 und 223 laden 
I -Regiater BC aicharn und 
l Zeichen B an der x/y-Poaition 
l auageben 

I -BC auf alten Wert Betzen 
I -y-Koardinat* ua 1 vermindern und 
I Zeichen C an der x/y-Poaition 
I auageben 

Reihenfolge (das geht bei der Links- 
bzw. Rechtsbewegung nicht, Karlchen 
würde bei umgekehrter Bildsequenz 
rückwärts laufen). Also verbleiben vier 
Zeichen für die Aufwärtsbewegung 
(bzw. die Abwärtsbewegung). Hieraus 
wurden nun auch wiederum zwei ver¬ 
schiedene Bewegungsbilder hergestellt: 
einmal Karlchen mit dem linken Bein 
angewinkelt und Blick nach links und 
zum anderen Karlchen mit angewinkel¬ 
tem rechten Bein und Blick nach rechts. 

Das Erzeugen einer Bewegung aus die¬ 
sen Bildern richtet sich nun aber nach 
dem Wunsch desjenigen, der das Vi- 
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A091 

22FDA0 

1700 


ld 

<y>.hl 

1 

-neue Koordinaten abapeiehern und 

A094 

104B 

1710 


Jr 

Walter 

1 

Sprung zur Routine weiter 

A096 

CB57 

1720 

linkst 

blt 

2,a 

1 

-Joystick nach llnka gerichtet 7 

AO90 

2822 

1730 


Jr 

z,rachte 

1 

-Wenn nicht ■•> rechte 

A09A 

7C 

1740 


ld 

a,h 

1 

-Wann eich die Spielfigur 

A09B 

FE01 

1730 


cp 

1 

1 

ln dar aratan Spalte befindet, 

A09D 

2B8E 

1760 


Jr 

z,Joystl 

1 

Sprung zu Joyatl 

A09F 

CDE4A0 

1770 


call 

loaach 

1 

-Alte PoeltIon loeechen 

A0A2 

23 

1780 


dac 

h 

1 

-x-Koordinata um 1 vermindern 

A0A3 

3AFFA0 

1790 


ia 

a, (11) 

1 

-Aua dam alten Bawagungazuatand 

A0A6 

EE01 

1800 


xor 

1 

1 

den neuen Bawagungaatatua errechnen 

AOA8 

32FFA0 

1810 


ld 

(11), a 

1 

und w lad er abapelchern 

AOAB 

06E3 

1820 


ld 

b,229 

1 

-B mit dam Zalchan 229 laden, 

AOAD 

BO 

1830 


add 

a,b 

1 

falle noetlg, 1 addieren und auf 

AOAE 

CDEEAO 

1B40 


call 

aatcur 

1 

x/y-Position auageban 

A0B1 

2D 

1850 


dac 

1 

1 

-y-Koordinata um 1 vermindern und 

A0B2 

3EE4 

1B60 


ld 

a, 226 

1 

das Zeichen 228 (Kopf) an 

A0B4 

CDEEAO 

1870 


call 

aatcur 

1 

der x/y-Position auageban 

A0B7 

22FDAO 

1BQ0 


ld 

<y),hl 

1 

-neue Koordinaten abapeiehern und 

AOBA 

1823 

1890 


Jr 

weiter 

1 

Sprung zur Routine weiter 

AOBC 

CB3F 

1900 

rachtsi 

blt 

3,a 

1 

-Joystick nach rechte gerichtet 7 

AOBE 

2821 

1910 


Jr 

z,weiter 

1 

-Wann nicht "“> Walter 

AOCO 

7C 

1920 

rweitr 

ld 

a,h 

1 

-Wann sich die Spielfigur 

A0C1 

FE28 

1930 


=P 

40 

1 

ln dar 40. Spalte befindet, 

A0C3 

CA2DA0 

1940 


JP 

z,joyatl 

1 

Bprung zu joyatl 

A0C6 

CDE4A0 

1930 


call 

1oeach 

1 

-Alte Position loeechen 

A0C9 

24 

1960 


inc 

h 

1 

-x-Koordinata um 1 erhoehen 

AOCA 

3AOOA1 

1970 


ld 

a,<ra) 

1 

-Aua dam alten Bawagungazuatand 

AOCD 

EEOl 

1980 


xor 

1 

1 

den neuen Bawagungaatatua errechnen 

AOCF 

3200A1 

1990 


ld 

<re> ,a 

1 

und wieder abapelchern 

A0D2 

06E2 

2000 


ld 

b, 226 

1 

-B mit dam Zeichen 226 laden, 

A0D4 

80 

2010 


•dd 

a,b 

1 

falls noetig, 1 addieren und auf 

A0D3 

CDEEAO 

2020 


call 

aatcur 

1 

x/y-Poiltlon auageban 

A0D8 

2D 

2030 


dac 

1 

1 

-y-Koordinate um 1 vermindern und 

A0D9 

3EE1 

2040 


ld 

a, 223 

1 

den Kopf (Zeichen 223) an 

AODB 

CDEEAO 

2030 


call 

aatcur 

1 

dar x/y-Poaltion auageban 

A0DE 

22FDA0 

2060 


ld 

(y),hl 

1 

-neue Koordinaten abapeiehern und 

AOE1 

C32DA0 

2070 

weitert 

JP 

Joyatl 

1 

Sprung zur Routine Joyatl 

A0E4 

3E20 

2080 

1 DliCh t 

ld 

a,32 

1 

-Daa Fraizaichan 

A0E6 

CDEEAO 

2090 


call 

aatcur 

I 

an und 

A0E9 

2C 

2100 


lnc 

1 

1 

unter der momentanen 

AOEA 

CDEEAO 

2110 


call 

aatcur 

• 

x/y-Paaition auageban 

AOED 

C9 

2120 


rat 


1 

-Rueckkehr ine Hauptprogramm 

AOEE 

E3 

2130 

eetcuri 

puah hl 

1 

-Alle hier 

AOEF 

CS 

2140 


puah bc 

1 

angegebenen Register 

AOFO 

F3 

2130 


puah »f 

1 

Bichern 

AOF1 

CD75BB 

2160 


call 

Cbb73 

1 

-Durch TXT SET CURSOR Cursor auf 

AOF4 

Fl 

2170 


pop 

af 

1 

x/y-Poaition setzen und das durch 

A0F3 

F3 

2180 


puah af 

1 

den Akkumulator angabens Zeichen eit 

A0F6 

CD5DBB 

2190 


call 

£bb3d 

1 

Hilfe von TXT WR CHAR auageban 

A0F9 

Fl 

2200 


pop 

af 

t 

-Alle 

AOFA 

CI 

2210 


pop 

bc 

1 

Register 

AOFB 

El 

2220 


pop 

hl 

1 

wiederheretellen und 

AOFC 

C9 

2230 


rat 


1 

Rueckkehr ine Hauptprogramm 

AOFD 

00 

2240 

y« 

dafb 

0 

1 

-y-Koordinate der Splelfigur 

AOFE 

OO 

2250 

X ! 

dafb 

0 

1 

-x-Koordinate der Spielfigur 

AOFF 

00 

2260 

lli 

dafb 

0 

1 

-Statue der letzten Links-Bewegung 

AlOO 

OO 

2270 

rar 

dafb 

0 

1 

-Statue der letzten Rechts-Bewegung 

AlOi 

00 

2280 

hoi 

dafb 

0 

1 

-Statue der letzten Vertikal-Bewegung 



2290 

1 







2300 

I Taball• fuer dia selbetdefinierten Zalchan ab Symbol 221 



2310 

1 





A102 

001C3E3E 

2320 

■ymboll 

dafb 

0,28,62,62,62 

,28,25,23 

-Vertikal-Statue Ol Kopf 

AlOA 

7E989B18 

2330 


dafb 

126,152,132,24,36,39,32,192t -V.-Statua Ol Bein» 

Al 12 

00387C7C 

2340 


dafb 

0,56,124,124, 

124,56,132,1521 -V.-Btatu» ll Kopf 

Al 1A 

7E19191B 

2350 


dafb 

126,25,25,24, 

36,228,4,31 -V.-Statua ll Beine 

A122 

387C7476 

2360 


dafb 

56,124,116,118,124,36,8,1201 -Rachtai Kopf 

A12A 

FCBB3B30 

2370 


dafb 

232,187,36,36,248,140, 

32,3| -Re.-8tatue Oi Beins 

Al 32 

FCBB3B38 

2380 


dafb 

232,187,36,36,40,72,40 

14i -Re.-St«tue ll Beine 

A13A 

1C3E2E6E 

2390 


dafb 

28,62,46,110 

62,28,12,301 -Linke! Kopf 

A142 

3FDD1C1C 

2400 


dafb 

63,221,28,28, 

31,49,33, 

1921 -Li.-Status Ol Beins 

A14A 

3FDD1C1C 

2410 


dafb 

63,221,28,2B 

20,1B,20,4B| -Ll.~8tatue li Beine 


deospiel bedient. Also muß das Augen¬ 
merk nun zunächst auf die Abfrage der 
Tastatur bzw. des Joysticks gerichtet 
werden. Für die Abfrage des Joysticks 
gibt es in der Firmware die Routine KM 
GET JOYSTICK ab &bb24. Diese 
Routine gibt den Wert Null zurück, falls 
keine Taste gedrückt wurde. Andern¬ 
falls gibt der Akkumulator den Wert des 
Jqystickports zurück. Die einzelnen Be¬ 
wegungen des Joysticks werden durch 
entsprechend gesetzte Bits im Akkumu¬ 
lator nach folgender Tabelle wiederge¬ 
geben: 

Bit 0 : Joystick hoch 
Bit 1 : Joystick ab 
Bit 2 : Joystick links 
Bit 3 : Joystick rechts 

Wenn der Joystick tatsächlich bewegt 
wurde, wird ab Label »test« diese Be¬ 
wegung ausgewertet, andernfalls wird 
die Tastatur mit Hilfe von KM READ 
CH AR (&bb09) abgefragt. Wenn auch 
hier keine Taste gedrückt wurde (also 
das Carry-Flag gelöscht ist, wird die 
Abfrageschleife des Joysticks wieder 
angesprungen. Andernfalls wird der 
Tastaturcode nach dem gleichen Muster 
ausgewertet wie der Joystickcode. Für 
die Steuerung können also beliebige Ta¬ 
sten ausgesucht werden, sie müssen le¬ 
diglich die einzelnen Bits entsprechend 
der obigen Tabelle setzen bzw. löschen. 
Am einfachsten funktioniert eine Steu¬ 
erung über die Tastatur jedoch mit: 

A : hoch 
Z : runter 
D: links 
H : rechts 

Wenn die Spielfigur bewegt werden 
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sollte, wird also der Programmteil ab 
Label »test« ausgeführt. Diese Routine 
selektiert zunächst, in welche Richtung 
die Bewegung ausgeführt werden soll. 
Dann werden die notwendigen Kontrol¬ 
len durchgefuhrt (sie sollen verhindern, 
daß die Spielfigur aus dem Bildschirm 
herausläuft und den Rechner zum Ab¬ 
sturz bringt). Die Berechnung der neu¬ 
en Koordinaten ist dabei ziemlich ein¬ 
fach: die x-Koordinate (bzw. die y- 
Koordinate) werden lediglich dekre- 
mentiert oder inkrementiert. Um nun 
Karlchen zu einer flüssigen Bewegung 
zu bringen, muß allerdings bei allen 
Bewegungen noch die aktuelle Spielfi¬ 
gur verändert werden. Jedoch geschieht 
auch das nach einem relativ einfachen 
Prinzip. Als Beispiel soll die Bewegung 
nach rechts dienen: Für die Bewegung 
nach rechts gibt es zwei unterschiedli¬ 
che Karlchens. Bei jeder neuen Posi¬ 
tionsangabe muß nun lediglich ein an¬ 
deres Karlchen gewählt werden, als 
das, was zuletzt auf dem Bildschirm 
dargestellt wurde. Wir haben diese bei¬ 
den unterschiedlichen Karlchens Status 


0 und Status 1 genannt. Nun wird ledig¬ 
lich vor jeder neuen Bewegung eben¬ 
falls der Status der Bewegung umge¬ 
dreht. War er vorher 0, so muß er nun 
1 werden, war er vorher 1, so muß er 
als nächstes 0 werden. Das geschieht 
ganz einfach durch ein exklusives Oder 
des letzten Status mit der Zahl 1. Wenn 
eine beliebige Zahl mit 1 exklusiv oder 
verknüpft wird, so wird das erste Bit 
der Zahl (Bit 0) umgedreht. Das bedeu¬ 
tet in unserem Falle genau das, was wir 
auch beabsichtigten. Es findet bei je¬ 
dem »XOR 1« ein Wechsel des Akku¬ 
mulatorinhalts von 0 auf 1 bzw. umge¬ 
kehrt statt. Dieser Statuswechsel wur¬ 
de zum Beispiel in den Zeilen 
1350—1370 programmiert. Das Errech¬ 
nen der genauen Nummer des Karl- 
chensymbols aus dem Status ist nun 
auch ganz einfach. Die beiden Symbo¬ 
le, die Status 0 und Status 1 darstellen, 
folgen in ihrer Symbolnummer direkt 
aufeinander. So hat bei der Rechtsbe¬ 
wegung Status 0 den Symbolcode 226 
und Status 1 den Code 227. Es ist also 
offensichtlich, daß einfach der aktuel¬ 


le Status auf die 226 addiert werden 
muß, um den korrekten Code zu erhal¬ 
ten. War der Status 0, so ändert sich 
durch die Addition ja nichts, als Code 
resultiert also 226. War der Status je¬ 
doch 1, so wird der Symbolcode durch 
die Addition auf 227 erhöht, so daß 
auch hier das richtige Zeichen errech¬ 
net wird. 

So stellt sich also das Problem der 
Spielfigur als gar nicht so kompliziert 
heraus, wie es vielleicht viele erwartet 
hatten. Denn die Darstellung und Be¬ 
wegung der Spielfigur haben wir nun 
schon programmiert. Jeder Leser, der 
die Serie aufmerksam verfolgen will, 
sollte sich nun noch einmal das sehr 
ausführlich kommentierte Assembler- 
listing genau ansehen, damit auch tat¬ 
sächlich alle Programmierschritte 
nachvollziehbar bleiben. Und wer Lust 
hat, kann sich ja schon einmal Gedan¬ 
ken zum Thema »Das Spielfeld: Auf¬ 
bau und Kontrolle« machen, denn das 
wird Gegenstand der nächsten Folge 
sein. 

(Martin Althaus, Markus Zietlow) 





, u r>' 0 


P C 

feg- 



Mndeäbe5lellweilDM30.- Bei Voiauskasseauf Sollwate 3% Skonto sowie Lieferung frei Haus Oiskettenlaulwerte und Drucker zuzgl DM 
10.-. Computer zuzgl DM 20,- Porto und Verpackung Auslandsbesleiiungen nur gegen Vwauskasse ‘ Lieleiung solange Vorrat reicht 


..Neuheiten - endlich lieferbar.. 

Cyrus II Chess 75,- 

Wlnrergamos 65, - 

Summsrgames II 65,- 


AnwenderprogrammefürCPC und JOYCE: 

The Music System C/D 45,-755,- 

Laser Basic C/D 45, -.'55, - 

Laser Compiler C/D 45,-755,- 

P-Y-R-A-D-E-V D 89,- 

The Art Studio (CPC6126) O 55,- 

Pagemakei 0 145.- 

Nevada COBOL Compllet(CPC+Joy ) D 135- 
Nevada FORTRAN Compiler (CPC-Joy l D 135- 
Hlsolt C-Compiler iCPC-Joyce) D 135- 

Pascal MT^ Compiler iCPC.Joyce) D 135- 
CBASIC Compiler (CPC. Joyce) D 135 - 

DRDraw (CPC 6128. Joyce) D 159.- 

DR Graph (CPC6128.Joyce) D 159,- 

Wordslar 30 (CPC.Joycel D 178, 

dBase II (CPC.Joycel D 179.- 

Multiplan (CPC.Joycel D 179.- 


SPIELE FUB CPC: 

Nexor 
Queslor 
Aclivisator 
The Eidolon 
Prodigy 

Nuclear Defence 
Die Erbschaft 
Stainless Steel 
Werner mach hin 
Split Personalllies 
Tempesl 

Impossible Mission 

Llghlforce 

Tujad 

Froslbyte 

Deactivators 

Trailblazer 

Its a Knockout 

Computer Hits 3 

The Trap Door 

Highlander 

Irfiltralor 

Icon Jon 

Galvan 

Glider Rider 

Amlix Accolates (Spieles) 

Miami Vice 

Axiens 

Kentilla 

Back Io Reality 
Jewels of Darkness 
TimeTrax 
Avenger 
Ikari Warriors 


C/D 29.-/4S,- 
C/D 29. -/4S,- 
C/D 29,-745.- 
C/D 35,-755.- 
C/D 35, - /S5, - 
C/D 29, -/39, - 
C/D 49. - /59. 
C/D 29, - /45, - 
C/D 29, - /49, - 
C/D 29, - /59, - 
C/D 35. - /55, - 
C/D 35. - /45, - 
C/D 29, -739,- 
D 49,- 
C/D25.-/39.- 
C/D29.-/49.- 
C/D29.-/45.- 
C 29,- 
C 29.- 
C 25,- 
C 25,- 
C/D 35, —745, - 
C/D 29. - /39. - 
C/D 25. -/45. - 
C/D 29, - /39, - 
C/D 35.-745,- 
C/D 35,-745.- 
C/D 9.90/25.- 
C 9,90 
C 9,90 
C/D 59,-769.- 
C 29.- 
C/D 35, -/45.- 
CIO 29. - 745, - 


. Neuheiten - endlich lleferber... Neuheiten 


Firelord 

C/D 29,-735,- 

Hi|ack 

C/0 35,-745. 

Dynamits Dan II 

C/D 29, - 745 

Electra Glide 

C/O 29.-745,- 

Konami's Coin-OP Hits 

C7D 29. - 745, - 

Camelol Warriors 

C/D 29, -745.- 

Nosleralu 

C 29. 

Druid 

C/D 35, -745.- 

Bobby Bearing 

C7D 29. —749, - 

Sapulcri 

C/D 29. -739.- 

Xeno 

C 29. 

Hit Pack 

C/D 35, -739.- 

America’s Cup Challange 

C7D 35,-745.- 

They sold a Million lll 

D 45.- 

Five Star Games 

C 29. 

Eye Spy 

C 9,90 

Spy Treck 

C 9.90 

Konami's Goll 

C 35.- 

Legend ot Kage 

C7D 35, - 745. - 

Tartan 

C/D 29,-739,- 

Scooby Doo 

C/O 29,-745. - 

3 D Thai Boxing 

C/D 25,-745.- 

Inlodroid 

C/D 29, - 749, - 

Silicon Oreams 

C7D59.-769,- 

Aliens 

C/D 29, - 745, - 

Gaunllet 

C/D 35, - /45. 

Hacker ll 

C/D 29, - /45, - 

Dandy 

C/D 29, - /4S, — 

Breakthru 

C/D 29.-745. 

Deep Slrlke 

C 29, • 

Goonies 

C 29, - 

Stargllder 

C/D 45,-789.- 

Cityslicke' 

C7D 26, -739, - 

Dragon's Lair 

C/D 29. -745, - 

Jail Break 

C/D 29. -749.- 

Heartland 

C7D 29.-759,- 

Footballer of the Year 

C 35,- 

Tobruk 

C7D29.-745.- 

Trivial Pursuil 

D 55.- 

1942 

C7D29, -745,- 

SPIELE FOJR JOYCE: 


Fairlight 

49,- 

Tomahawk 

59,- 

Afterschock 

55,- 

Batman 

45,- 

SAS Raid 

45,- 

3 D Clock Chess 

45,- 

Colossus Chess Volume IV 

45,- 

Cyrus II Chess 

49,- 

Jewels of Darkness 

69 - 

..Neuhaiton - endlich lieferbar.. .Neuheiten 

Silicon Dreams 

69,- 



Postfach 1461 ■ 7920 Heidenhelm - Tel. (07321)4664 
Bankverb.: Dresdner Bank Heidenheim (BLZ 61460001), Kto. 570142900 


44 PC 2’87 










Kurse—i 


CAD-Einführung 



Nein - dieser Artikel hat nichts mit 
Chemie zu tun, aber die moderneren 
CAD-Systeme können mehr als nur 
physikalische oder mechanische For¬ 
men darstellen. Ebenso sind auch 
biologische und chemische Formen 
möglich. Unser Bild zeigt ein Steriod- 
molekül. Es wurde in wenigen Minu¬ 
ten mit den Befehlen DS (gestalten), 
DM (bewegen), PL (zeichnen) und 
PX (Text einfügen) gestaltet. 

Nun aber zu unserem eigentlichen The¬ 
ma. In dieser Folge geht es um einige 
technische Überlegungen zu unserem 
Gesamtsystem. Falls Sie das nicht be¬ 
sonders interessiert, tippen Sie einfach 
das Steuermodul ab und warten dann 
auf die Folge 3, die sich mit sehr an¬ 
spruchsvollen graphischen Befehlen 
auseinandersetzt. 

Wenn Sie sich die technische Sektion in 
Folge 1 etwas genauer angesehen ha¬ 
ben, werden Sie sich vielleicht über den 
Aufbau der »Pxy-Arrays« gewundert 
haben. Diese »Arrays«, nennen wir sie 
von nun an Tabellen — dieser Begriff ist 
in der EDV gebräuchlicher, enthalten 
die XY-Koordinaten für die zukünftigen 
CAD-Formen oder Designs. Unsere 
Tabellen haben also 200 linke und 200 
rechte Punkte. Warum aber schreiben 
wir dann: 
pmax=200:lr=4 
dim pxy (lr,pmax) 
anstatt: 

dim pxy(4,200) 

Wäre die letzte Schreibweise nicht bes¬ 
ser? Im Gegenteil, sie wäre weniger 
sinnvoll — sprich dümmer. Wir haben 
aus Platz- und Zeitgründen nur eine 
2x200 Punkttabelle (x,y pro Punkt = 


dim (4,200)) aufgebaut. Verfügt man 
über einen CPC 6128 oder baut später 
eine Speichererweiterung ein, kann 
man diese Tabelle wesentlich erweitern 
- sagen wir auf: dim pxy(4,2000). 
Nun, in allen folgenden Programmen 
werden wir häufig die gesamte Tabel¬ 
le durchsuchen müssen — etwa mit 
dem Befehl: 

FOR p = 1 to 200 
Ifpxy(l,p)= ... 

Vielleicht wäre aber diese Schreibweise 
sinnvoller: 

FOR p = 1 to pmax 
Ifpxy(ly,p)= .... 

Sie haben es mit Sicherheit sofort ver¬ 
standen. Muß oder will man aus 
irgendeinem Grund die Designtabelle 
ändern, müßte man bei einer nicht sym¬ 
bolischen Schreibweise vielleicht ein 
paar hundert Befehle ändern! Das wäre 
wirklich lästig. Die Benutzung von 
symbolischen Definitionen hat u.a. den 
Vorteil, daß man bei einer Tabellener- 


pmax=2000 — zu ändern braucht. 

Bei jeder Programmentwicklung soll¬ 
te man darauf achten, keine festen Wer¬ 
te zu verwenden. Die symbolische 
Schreibweise, die anfangs zwar mehr 
Arbeit verursacht, zahlt sich jedoch 
durch ihre hohe Flexibilität später aus. 
Programme sollten ferner strukturiert 
geschrieben werden. Besonders größe¬ 
re Programme verlieren an Übersicht, 
wenn sie nicht stukturiert sind und ma¬ 
chen nachträgliche Änderungen sehr 
schwierig. Unser CAD-System hat fol¬ 
gende Struktur: 

1. Eine Hauptsteuerung (das obere 
Management), die nichts tut aber alles 
kontrolliert. 

2. Eine Kommandosteuerung (CMD), 
die wirklich schwere Arbeit leistet und 
wenig Lohn und Anerkennung be¬ 
kommt. (Mir kommt das irgendwie be¬ 
kannt vor). Auf jeden Fall ist die CMD- 
Steuerung der wichtigste Teil unseres 
Gesamtprogramms - ohne ihn läuft 
nichts. 

3. Die Verarbeitungseinheiten. In die¬ 
sen Untermodulen finden alle Verarbei¬ 
tungsvorgänge statt. Diese haben - wie 
es sich in der strukturierten Program¬ 
mierung gehört — einen Eingang und 
einen Ausgang. Sie werden bei Bedarf 
von der CMD-Steuerung angestoßen. 
Diese Module sind in sich abgeschlos¬ 
sene Verarbeitungssysteme, die man 
auch sinnvollerweise separat program¬ 
mieren kann, d.h. z.B. das Modul 
»Save Screen SS« kann man für sich be¬ 
handeln und in einer »Modulbiblio¬ 
thek« separat abspeichem und nachher 
durch einen Prozeßverlauf zu einer 


Weiterung nur einen Befehl — nämlich Phase verbinden — etwa so: 
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10 ’Binder CAD-System 
100 LOAD “Hauptsteuerung“ 

200 MERGE “Technical Section“ 

300 MERGE “Menu“ 

400 MERGE “CMD-Steuerung“ 

500 MERGE “Save Screen“ 

600 MERGE.usw. 

Diese Vorgehensweise hat den entschei¬ 
denden Vorteil, daß man jedes Element 
für sich behandeln kann — etwa mit 
RENUM und auch MERGE aus ande¬ 
ren Modulen - ohne das Gesamtsy¬ 
stem zu stören. Somit bauen Sie sich 
auch eine interessante Modulbibliothek 
auf. 

Diese Lösung ist besonders oder viel¬ 
leicht nur dann vorteilhaft, wenn man 
eine Floppy-Disk zur Verfügung hat. 
Das gesamte CAD-System benötigt — 
mit Buffer — um die 40K Speicher¬ 
platz. Mit einem Kassettendeck dauert 
ein Bindelauf noch länger als das Laden 
des Systems. Es entstehen demnach 
ohne Floppy Zeitprobleme, aber wenn 
Sie Zeit haben, können Sie diese Lö¬ 
sung trotzdem einmal versuchen. 
Wichtig — nein, fast notwendig ist, daß 
Sie die Zeilennumerierung genau nach 
der Programmvorgabe beibehalten. In¬ 
nerhalb der einzelnen Module kann 
man ruhig kreativ mitarbeiten, aber der 
Eingang zum Modul muß die gleiche 
Zeilennummer wie die in der Vorgabe 
haben und der Ausgang sollte dem 
Standard entsprechen — er sollte am 
Ende des Modules stehen. 

Sie werden im weiteren Verlauf dieser 
Serie erkennen, daß diese Numerie¬ 
rung nicht willkürlich gewählt worden 
ist. Später, wenn das Gesamtsystem 
steht, können Sie natürlich alles wieder 
ändern. Mit einem gewollten oder un¬ 


gewollten RENUM ist die gesamte Pro¬ 
grammübersicht dahin! Aber jetzt zum 
eigentlichen Ziel unserer Folge — die 
Kommando- oder CMD-Steuerung. 
Wir werden unsere Wünsche an das Sy¬ 
stem durch Befehle bekannt machen. 
Die CMD-Steuerung wird diese Befeh¬ 
le interpretieren und die entsprechen¬ 
den Verarbeitungsmodule anstoßen 
oder sie wird sagen, daß sie den Befehl 
nicht versteht: »CMD unknown«. Wie 
in Folge Eins schon erwähnt, können 
Sie das Ganze auch in Deutsch halten: 
»Befehl unbekannt« - nur darf der Dia¬ 
log mit dem System nicht länger als 20 
Zeichen betragen. Sie werden schnell 
sehen, warum das so ist. Es werden nur 
20 Zeichen gelöscht. 

Die Befehle werden oben links am Bild¬ 
schirm eingegeben. In diesem CAD- 
System halte ich nicht viel von der 
»Window-Technik«. Gewiß, man könnte 
ein Befehlswindow aufbauen: 
WINDOW #1,2,39,1,1 
PAPER #1,3: CLS #1 usw. 
oder noch »professioneller« könnte man 
ein Seitenfenster mit Piktogrammen 
aufbauen, die man ggf. mit einem 
Lichtstift antippt. Aber für eine Einfüh¬ 
rung ist das ein wenig übertrieben, 
denn einmal erschwert es die Program¬ 
mierung und bringt doch keine wirkli¬ 
chen Vorteile, und zum anderen kann 
man den Bildschirm nicht in seiner vol¬ 
len Länge und Breite benutzen. Irgend¬ 
wo ist da immer ein Streifen oder Fen¬ 
ster, das einen bei der Arbeit stört. In 
professionellen CAD-Systemen sind 
deshalb auch Piktogramme und ähnli¬ 
ches immer auf einer separaten Tasta¬ 
tur oder Tafel und fest nie auf dem Büd- 
schirm angegeben. 


Wir haben für unser System die ein¬ 
fachste und für unsere Begriffe die be¬ 
ste Lösung gewählt. Die Befehle wer¬ 
den oben links eingegeben und nach der 
Ausführung verschwindet die ganze 
Zeile. Als kleine Sicherheit werden die 
CMD-Befehle immer in PEN 1 und 
PAPER 0 geschrieben — unabhängig 
von der aktuellen Farbe - denn ein ro¬ 
tes Zeichen auf rotem Papier sieht man 
schlecht! 

Zur Farbe möchte ich nochmals beto¬ 
nen, daß sie keinen großen Stellenwert 
in der CAD-Technik hat. Bei Phantom- 
bildem von Maschinenteilen, Flugzeu¬ 
gen, Autos oder Häusergrundrissen 
usw. spielt Farbe — im Gegensatz zu 
graphischen Systemen — nur eine un¬ 
bedeutende Nebenrolle. Trotzdem wer¬ 
den wir aber auch in diesem CAD- 
System die ganze Palette der PAPER-, 
PEN-, INK- und BORDER-Befehle zur 
Verfügung haben. 

So, nun kommen wir endlich zu der 
Codierung der CMD-Steuerung, mit 
der Sie absolut nichts anfangen können! 
Eine Steuerung ohne Verarbeitungsein¬ 
heiten ist wie ein Chef ohne Arbeiter. 
Die stehen beide ganz dumm da und er¬ 
teilen wie wild Befehle, aber keiner tut 
etwas. Geduld! Tippen Sie einfach die 
CMD-Steuerung und einige notwendi¬ 
ge Untermodule ab (von Zeile 60000 
an) und speichern das Ganze in Ihrer 
Modulbibliothek. In der nächsten Folge 
dieser CAD-Einführung kommen dann 
die »Arbeiter«, die Verarbeitungsmodu¬ 
le, an die Reihe und dann kann die 
CMD-Steuerung richtig loslegen, Be¬ 
fehle erteilen und dann passiert etwas 
- hoffentlich?! 

(R. Kotny) 


Generalvertretung für die Schweiz: 
Domodul AG, Postfach 204, CH-9450 Altstätten 


Die absolute Sensation auf dem Software Markt! 
TAS 298, - 

Relationale Datenbank/Programmiersprache mit Compiler 

TAS Leistungsdaten 

max 16 geöffnete Datendateien 
max. 16 Schlüsselfelder pro Datei 
max, Feldgröße 254 Zeichen 
max 255 Variablen pro Programm 
max. Datensatzgröße 10.254 Zeichen 
unlimitierte Anzahl an Feldern pro Datei 
unlimitierte Dateigröße 
max 65535 Datensätze 

Mit TAS entwickeln Sie Ihre eigenen menügesteuerten Programme von der einfachsten Adreßverwal- 
tung bis zur Fakturierung oder Finanzbuchhaltung. 

Mit TAS erwerben Sie eine Programmiersprache mit vielfältigen Möglichkeiten, einen Compiler und das 
Anwenderprogramm ADRESS Mit ADRESS können Sie Adressen verwalten, ausgeben, zwei verschie¬ 
dene Listenformate, sowie Etiketten ausdrucken. 

Ab sofort bei uns erhältlich für die Schneider Rechner CPC 61?8 und Joyce 

U0LFGRHG HEtlSCHKE DRTEHTECHMK 


inklusive 200 seifigem deutschen Handbuch und ei¬ 
ner mit TAS entwickelten Adressverwaltung der Spit¬ 
zenklasse. 


Htindleranfragen erwünscht. 


Aidlinger Weg 6, Tel.: 0 7034/29610 
7034 Gärtringen 


yy; 

/// 
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Kurse—i 


für 464-664-6128 
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3000 ' cnd-control [8013 

3010 ' f117] 

3020 ' [117] 

3030 TAGOFF [10667 

3040 GOSUB 61000: 'clear prompt [1720] 

3050 PAPER 0:PEN 1 [9657 


3060 'IF ERR > 0 THEN PRINT "error:; ERR; " [36323 
ln:";ERL:FOR t = l TO 5000:NEXT:GOSUB 61000 
3070 IF fehlkz = 1 THEN PRINT fehltext®:FO [23967 
R t=l TO 5000:NEXT:GOSUB 61000 

3080 IF fehlkz = 2 THEN PRINT "syntax erro [35577 
r":FOR t=l TO 5000:NEXT:GOSUB 61000 


3090 INPUT; resp® [3993 

3100 GOSUB 61000 C9273 

3110 fehlkz=0 [6823 

3120 fehltext$=STRING®(20, " "3 [11193 

3130 ' [1173 

3200 resp®=LGVER$(resp®) [19073 

3210 cmd$=LEFT®(resp$,23 C5217 

3220 - ri17] 

3230 ' C1173 

3240 FOR cmdindx = 1 TO cmdcount [18577 

3250 ' [1173 

3260 IF crad® = cradnara®(cmdindx) THEN GOTO [25437 
3400 

3270 ' [1173 

3280 NEXT cmdindx [10433 

3290 ' [1173 

3300 ' cmd not found [5943 

3310 fehlkz = 1 [6813 

3320 fehltext® = "cmd unknown" C17463 

3330 GOTO 3070:' *break* [13723 

3340 ' [1173 

3400 IF INSTR(2,resp®," : " )>0 THEN cmd® =MI [33253 

D$(resp$,4) ELSE cmd®=MID®(resp®,3> 

3410 ' reraove : from text [9153 

3420 PEN pennr: PAPER papernr [10033 

3430 IF cmdindx > 30 THEN GOSUB 3600 ELSE [66063 
IF cmdindx > 20 THEN GOSUB 3700 ELSE IF cm 
dindx > 10 THEN GOSUB 3800 ELSE GOSUB 3900 
3440 ' [1173 

3450 ' [1173 

3500 RETURN [5553 

3510 ' [1173 

3520 ' [1173 

3600 'cmds > 30 (3933 

3601 ' [1173 

3610 cmdindx = cmdindx - 30 [610] 

3620 ON cmdindx GOSUB 37000,38000,40000,41 [33783 
000,42000,43000,44000,45000,46000,47000, 46 

000 

3680 ' [1173 

3690 RETURN [5553 

3691 ' [1173 

3700 ' cmds > 20 and < 31 [6053 

3710 ' [1173 

3720 cmdindx = omdindx-20 [6043 

3730 ' [1173 

3740 ON cmdindx GOSUB 27000,28000,29000,30 [30613 
000,31000,32000,33000,34000,35000, 36000 

3750 ' [1173 

3790 RETURN [5553 

3791 ' [1173 

3800 ' cmds 11 to 20 [11443 

3810 ' [1173 

3820 cmdindx = cmdindx - 10 r5983 

3830 ' [1173 

3840 ON cmdindx GOSUB 17000,18000,19000,20 [36543 
000,21000,22000,23000,24000,25000,26000 

3850 ' [1173 

3890 RETURN [5553 

3891 ' [1173 

3900 ' cmds to 10 [6163 

3901 ' [1173 

3910 ON cmdindx GOSUB 10000,10500,11000,12 [30673 
000,12500,13000,13500,14000,14500,15000 

3920 ' [1173 

3990 RETURN [5553 

3991 ' [1173 

60000 'cursor raove [4193 

60010 ' [1173 


60020 

TAGOFF 


I1066) 

60030 

PRINT CHR®(23);CHR®(1> 


C19783 

60040 

TAG 


(3183 

60050 

' 


[1173 

60060 

IF cpx > 640 OR cpx < 16 OR cpy > 

40 

C33193 

0 OR cpy < 16 THEN cpx = 16: cpy = 16 



60070 

cnr = 233 


[2503 

60080 

MOVE cpx,cpy:PRINT CHR®(cnr); 


[30991 

60100 



[1173 

60110 

Key Control 


[15103 

60120 



[24653 

60130 

' 


[1173 

60140 

cp® = " " 


[3873 

60150 

cp$ = INKEY® 


[4723 

60160 

IF cp® = THEN GOTO 60150 


[15523 

60170 



[1173 

60180 

INPUT Control 


[1823 

60190 

' 


[27333 

60200 



[1173 

60210 

IF ASC(cp®)=240 THEN GOSUB 60700: 

GO 

C17683 

TO 60140 



60220 

Cursor = raove up 


14243 

60230 

IF ASC(cp®)=241 THEN GOSUB 60740: 

GO 

C29353 

TO 60140 



60240 

Cursor = move down 


14003 

60250 

IF ASC(cp®)=242 THEN GOSUB 60760: 

GO 

[22243 

TO 60140 



60260 

Cursor = move left 


[3593 

60270 

IF ASC(cp®)=243 THEN GOSUE 60780: 

GO 

[23503 

TO 60140 



60280 

Cursor = move right 


[6693 

60290 

- 


[1173 

60300 

MOVE cpx,cpy:PRINT CHRS(cnr); 


[30993 

60310 

TAGOFF 


[10663 

60320 

PRINT CHR®(23);CHR®(0> ; 


[20983 

60340 

' 


[1173 

60400 

RETURN 


[5553 

60700 

MOVE cpx,cpy:PRINT CHR®<cnr>; : cpy= 

=cp 

[57023 

y+8¥pensize:MOVE cpx,cpy:PRINT CHR®(cnr> 

; 


60710 



[1173 

60720 

' 


[1173 

60730 

RETURN 


[5553 

60740 

MOVE cpx,cpy:PRINT CHR®(cnr>;:cpy~c 

[63323 

py-8*pensize:MQVE cpx,cpy:PRINT CHK$(cnr>; 


60750 

RETURN 


[5553 

60760 

MOVE cpx,cpy:PRINT CHR®(cnr);:cpx=c 

C 52473 

px-8*pensize:MOVE cpx,cpy:PRINT CHR$(cnr); 


60770 

RETURN 


[5553 

60780 

MOVE cpx,cpy:PFINT CHR®(cnr>; :cpx=c 

[63313 

px+8*pensize: MOVE cpx,cpy:PR INT CHR$(cnr); 


60790 

RETURN 


[5553 

61000 

'clear prompt 


[13383 

61010 

LOCATE 1, 1 


C6113 

61020 

PRINT STRING®(20," "> 


[ 15193 

61030 

LOCATE 1,1 


[6113 

61040 

RETURN 


[5553 

61100 

pause & clear prompt 


[13623 

61110 



[117] 

61120 

FOR t = 1 TO 2000 


[5713 

61130 

' 


[1173 

61140 

NEXT t 


[3603 

61150 

- 


[1173 

61160 

GOSUB 61000: 'clear prompt 


[17203 

61170 



[1173 

61160 

RETURN 


C555 3 

61300 

'high 1/rindx 


[11073 

61310 

FOR lindx = 1 TO proax 


[13553 

61320 

IF pxy(ly,1indx) = 0 AND pxy(lx,lind 

[60993 

x>=0 THEN lindx = lindx -l:GOTO 61350 



61330 

NEXT lindx 


C10603 

61340 

' 


[1173 

61350 

FOR rindx = 1 TO pmax 


[8493 

61360 

IF pxy(ry,rindx) = 0 AND pxy(rx,rind 

[50513 

x>=0 THEN rlndx = rindx -l:GOTO 61390 



61370 

NEXT rindx 


C 454 3 

61380 



[1173 

61390 

RETURN 


[5553 

61400 

'cut first letter 


[8661 

61410 

- 


C1173 

61420 

cmd®=MID$(cmd®, 2) 


[13043 

61430 



[1173 

61440 

RETURN 


15553 

61450 

" 


[1173 

65000 

CLS 


C913 

65010 

PRINT "CAD -- END" 


[16283 

65020 

END 


[1103 
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r~Bericht 


Knack die Nuß 

Die beliebte Serie »Knack die Nuß« 
hat diesmal ein besonders interessan¬ 
tes Thema - das Zählen der Gold¬ 
stücke von Dagobert Duck! 

Folgende Aufgabe ist mit Hilfe des 
Computers zu lösen: 

Dagobert Duck möchte endlich einmal 
genau wissen, wieviel Goldstücke er 


besitzt. Dazu legt er diese erst als ein 
Quadrat aus, und siehe da, es geht ohne 
jeden Rest auf. Daraufhin ordnet Dago¬ 
bert seine Goldstücke in Form eines 
gleichseitigen Dreiecks an und auch 
jetzt geht es ohne Rest auf. Nun weiß 
man, daß Dagobert zwischen einer hal¬ 


ben und zwei Milliarden Goldstücke 
besitzt. Es müßte jetzt eigentlich klar 
sein, wieviel von diesen »Talerchen« 
Dagobert hat, oder? 

Um diese Aufgabe zu lösen, hat man 
sich als erstes zu vergegenwärtigen, daß 
die Anzahl der Goldstücke einer Reihe 
zum Quadrat (j*j) ist. Im Dreieck gilt 
die Formel: (i*(i+l))/2, dabei ist »i« die 
Anzahl der Reihen des Dreiecks, beim 
obigen Bild also vier ((4*(4+l)/2)=10, 
zählen Sie nach!). 

Um die gestellte Aufgabe zu lösen, hat 
man nun die Ergebnisse der beiden 
Formeln für beliebige i,j auf Überein¬ 
stimmungen zu überprüfen, d.h. es 
muß folgende Formel erfüllt sein: 

j*j=(i*(i+l»/2 (l) 

Durch Ziehen der Wurzel erhält man: 

j=(SQRT ((i*(i+1))/2) (2) 

SQRT bedeutet Wurzel (in BASIC 
SQR). Aus der Aufgabe ergibt sich, 
daß »i« und »j« ganzzahlig sein müssen. 
Nun brauchen wir nur mehr Werte für 
»i« in Formel (2) einsetzen und zu 
schauen, ob »j« ganzzahlig ist. 

Zum Schluß haben Sie nur noch den 
Wert, der zwischen einer halben und 
zwei Mrd. liegt, herauszusuchen und 
Sie wissen, wieviel Goldstücke Dago¬ 
bert Duck besitzt. 

Nach diesem beschriebenen Prinzip ar¬ 
beiten auch die beiden abgedruckten 
Pogramme. Es ist zu bemerken, daß bei 
sehr großen Zahlen Schwierigkeiten 
mit der Rechengenauigkeit auftreten 
können. Daher die Abfrage ’ >genau 
*j'statt’=0’. 

Da Turbo-Pascal auf elf signifikante 
Stellen genau rechnet (CPC BASIC: 9 
signifikante Stellen), kann man mit dem 
T\irbo-Pascal Programm um zwei Grö¬ 
ßenordnungen weiter und genauer rech¬ 
nen. Die Rechenzeit, um alle Zahlen 
bis 2 Mrd. zu ermitteln, liegt bei 
20—30 min. Die Turbo-Pascal Version 
ist trotz Compiler nur ca. 40 % schnel¬ 
ler als die BASIC-Version. 

Die Geschwindigkeit zollt der Genau¬ 
igkeit Tribut. Zum Schluß noch die er¬ 
sten vier ermittelten Werte, weitere soll¬ 
ten Sie sich selbst berechnen lassen. 
Zahlen, deren Quadrat- und Dreiecks¬ 
anordnung aufgehen: 

(Gerd Brinkmann) 


Zahl = 

1 

Quadrat = 

1 

3-Eck = 

1 

Zahl = 

36 

Quadrat = 

6 

3-Eck = 

8 

Zahl = 

1225 

Quadrat = 

35 

3-Eck = 

49 

Zahl = 

41616 

Quadrat = 

204 

3-Eck = 

288 


1 O REM * +•'+:+■*■+: •+: >+::+: +::+: * +• * * * + * *: •■+■ :* * 

20 REM * Knack die Nuss + 

30 REM * Version: Basic * 

40 REM * <C> 1986 by * 

5o REM * Gerd Brinkmann 

60 REM * a* 4: *:**::+: *.• :* *:*•*:*;+: :4--;+: * * 

70 MODE 2 
80 start=0 
90 ende=2E+09 
1 00 g e n a u=0.000000001 

110 PRINT"Zah1en zwisehen“start"und"ende"dessen" 

l^'O PRINT"Quadrat- und Dre i ecksanor dnug genau aufgehen!" 

130 PRINT 

IAO start«ROUNDCSQR<2*start)) 

150 en d e=R0UND(SQR < 2*ende)) 

160 FÜR i=start TO ende 
170 j =SQR(i*(i + 1)/2) 

180 IF ABS (ROUND ( j ) -j )<cjenau*j THEN GOSUB 210 
190 NEXT 
200 END 
210 PRINT 

220 PRINT"Zahl = "i*(i+ 1 >/2;TAB(25)"Quadrat ="j;TAB(50)"3—Eck ="i 
230 RETURN 


£*• Knack die Nuss Version: Turbo Pascal *) 
i *'■ (C) 19S& by Gerd Brinkmann *■) 

(»:»■**■*:**>*,.'*»: :**:, ; ****+*.-;, ! ,,:**.|.*******; ) 

PROGRAM raetsel; 

SONST 

genau = 1.OE—11; (* Rechengenauigkeit *) 

Start = 0.0; (* Startziffer 

ende = 2. OE 9; (■* Endziffer *) 

VAR 

i> j-e : REAL; 

PROCEDURE ausdruck; 

BEGIN 

Wrilein; 

Wr i te < ’ Zahl = ’ j* j : 13: 0, ’ Wurzel =’rj!7*0); 

Writelnf 7 3-Eck =’»is7:0); 

END; 

BEGIN 
CIrScr; 

Writeln(’Zahlen zwischen ’,start: 5: O, ’ und 7 >ende:5; 0 , 7 dessen 7 ) ;Writeln; 
Writelnf ’ Quadrat- und Dre iecksanordnung genau aufgehen ! 7 );Writeln; 
i:=SQRT (2#s t art); i: = i -FRAG (i); 
e:=SQRT(2*ende>;e:=e-FRAC(e); 

WH ILE Ke DO 
BEGIN 

i := 1+1.0; 
j := SQRT (i *(i+l)/2) ; 

IF FRACCj) < aenau+j THEN ausdruck; 

END; 

END. 
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STAR-WRITER 1 (464/664/6128) 

Das zur Zeit mit Abstand leistungsfähigste Textsystem für den CPC, das völlig neue Maßstäbe 


m Bedienung und Leistung setzt! 

• Einfache Bedienung durch PULL-DOWN-Menues 

• Deutsche DIN-Tastatur mit Aufkleber 

• Integrierte Adreßverwaltung im Direktzugriff 

• Integriertes Grafikprogramm zur Erstellung von 
Briefköpfen 

• Integriertes DFÜ-Programm für die Schneider-Schnittstelle 

• Integrierter Zeicheneditor zur Erstellung von 10 Zei¬ 
chensätzen 

• Anpaßbar an jeden Drucker der auf dem Markt erhältlich ist 

• Grafiken können in Text eingebunden werden 

• Basicprogramme können bearbeitet werden 

• Komfortable Diskettenverwaltung (löschen, kopieren...) 

• Ränder frei wählbar 

• Trennvorschläge 

• Zentrieren 

• Formatierte Ausgabe auf dem Bildschirm 

• Umfangreiche Blockoperationen 

• Umformatieren auf andere Formate 

• Zeichen einfügen und löschen 


• Zeilen einfügen und lösch 

• Absätze einfügen und lösi 

• Kopf- und Fußzeilen frei ä 

• Blocksatz 

• Flattersatz 

• Suchen und Ersetzen 

• Serienbrieffunktion 

• „MERGE"-Funktion 

• Fließtexteingabe 

• Wordwrap 

• Bausteinverarbeitung 

• 9 verschiedene Layouts 

• Proportionalschrift 

• Hervorhebungen wie: Unterstreichen, Fettdruck, Dop¬ 
peldruck, Kursiv, doppelte Breite, Schmalschrift, NLQ... 

• Mathematische Formelschreibweise (Hoch- und Tief¬ 
stellen) 

• Definierte Zeichensätze können auf entsprechendem 
Drucker ausgegeben werden (z. B. Russisch oder Fran¬ 
zösisch). 


:hen 

iderbar 



Version 3.0 


M.O.S. Mouse Operating System 
Das GEM* für den Schneider! 

M.O.S. ist eine neue Betriebssystem-Erweiterung für alle 
CPC-Rechner mit einem Diskettenlaufwerk. Das Programm 
kann mit Hilfe eines Joysticks oder einer Joystick-kompati¬ 
blen Maus (AMX, Reisware) gesteuert werden. 

M.O.S. verwandelt Ihren Schneider in einen neuen Computer, 
dem PULL-DOWN-Menues, ICON-Steuerung, grafische Be¬ 
nutzeroberfläche keine Fremdwörter mehr sind. 

M.O.S. ist nicht nur eine Betriebssystemerweiterung, die man 
nur unter Maschinensprache ansprechen kann, sondern 
wurde auch komplett in das hervorragende Schneider-Basic 
eingebunden. 

Deshalb ist M.O.S. sowohl für den Laien als auch für den Profi 
interessant, denn endlich ist das Erstellen von benutzer¬ 
freundlichen Programmen schnell und ohne großen Aufwand 
möglich. 


M.O.S. beinhaltet neben der eigentlichen Betriebssystemer¬ 
weiterung auch einen ICON-Designer, einen Zeicheneditor, 
einen MOUSE-Designer und ein sehr leistungsfähiges Grafik¬ 
programm mit Maus-/Joystick-Steuerung und vielen Funktio¬ 
nen. 

M.O.S. erlaubt das gleichzeitige Öffnen von bis zu 20 Win¬ 
dows (Bildschirmfenster), 5 PULL-DOWN-Menues und 20 
ICONs. Das Besondere hierbei ist aber, daß der Bildschirm¬ 
hintergrund gesichert wird. Das heißt, wenn man ein Window/ 
Menue/Icon schließt, erscheint automatisch der alte 
Hintergrund auf dem Bildschirm zurück. 

M.O.S. ist miteinemsehr ausführlichen deutschen Handbuch, 
das unter anderem alle dokumentierten Einsprünge in das 
M.O.S.-System enthält, auf 3-Zoll oder 5%-Zoll-Diskette 

für nur 98DM erhältlich. 


COPY-STARII 

ist die ideale Befehlserwei¬ 
terung für Druckerbesitzer, 
denn es stellt für alle gängi¬ 
gen Drucker Hardcopyfunk¬ 
tionen in verschiedenen 
Größen zur Verfügung So¬ 
gar Farbbilder lassen sich 
schattiert ausgeben. 
COPY-STAR II können Sie 
leicht in eigene Programme 
einbinden. 


Preis: 29,90 Kassette 
39,90 Diskette 

V___/ 


STATI8TIC-STAR 

Eine Grafik sagt mehr als 10OO Zahlen 

Ein professionelles Grafik- und Statistic- 
programm zum Auswerten von Daten aller- 
Art (Schule, Studium, Beruf, Hobby, Haus¬ 
halt.. .). 

• Linien-, Balken- und Tortengrafik 

• Betiteln von Grafiken 

• 400 Daten direkt im Speicher 

• Umfangreiche Editierfunktionen 

• Umfangreiche statistische Berechnungen 

• Hardcopyfunktion u.v.m. 

• Preis: 59,90 Kassette 

79,90 Diskette 


Beispielgrafik STATISTIC-STAR 



Weitere interessante Programme finden Sie in unserem ausführlichen Katalog! 





Vertrieb für die Schweiz: 

VCS Video-Computershop 

Händleranfrage 

erwünscht 

□ Senden Sie mir unverbindlich Ihren Katalog 

□ 6128 D664 D464 □ JOYCE 

□ Hiermit bestelle ich per Vorkasse/Nachnahme 

2120 LUNEBURG 
FERNRUF (041 31) 40 25 50 


llllL.illI 

111111111111 

!!Ü* 

111111111111 

Schaffhauserstraße 473 

P 0 Box 103, CH-8052 Zürich 
Telefon 01 / 3 02 26 00 

Software- A utoren 
gesucht 

Vorname 

Name 

' GEM isl eingetragenes Warenzeichen der Fa. DIGITAL-RESEARCH Inc. 

Vertrieb für Österreich: 

Ueberreuter-Media 

Alserstraße 24, A-1091 Wien 
Telefon 4 81 5380 

Unsere Produkte sind 
in allen führenden 
Computer-Shops 
sowie bei Karstadt 
und Brinkmann 
erhältlich! 

Wohnort 

Datum / Unterschrift 

(Alle Preise verstehen sich als unverbindliche 
Preisempfehlungen zzg 5.— DM Porto u Ver¬ 
packung) 





























I~ Software-Reviews 



Microdraft 

Hersteller: Timatic Systems 
Steuerung: Tastatur 
Monitor: Grün/Farbe 
Programm: 100% Maschinensprache 
Preis auf Anfrage 

Nulzelfekl Bödi&nungs- Doku- Grafik Arbais- Pi eis/ 

IrourdlichKßii menlatior geschwind^ Leistung 



CPC 6128 K 

Microdraft ist ein Grafikprogramm, 
das sich hervorragend für Architekten 
und technische Zeichner eignet. Es 
läuft nur unter CP/M 3.0, da für die 
Speicherung der Bilder relativ viel 
Platz benötigt wird. Nachdem das Pro¬ 
gramm gestartet wurde, erscheint der 
Bildschirm dreigeteilt: Der erste Teil 
sieht aus wie ein leeres Blatt Papier, auf 
dem sich ein Kreuz, der Cursor, befin¬ 
det. Dieser Cursor kann mit Hilfe der 
Cursortasten auf dem Blatt hin und her 
bewegt werden. Über dem eigentlichen 
Zeichenbereich befindet sich noch eine 
Zeile, in der der Name des Bildes an¬ 
gegeben wird. Zu Beginn der Arbeit, 
wenn noch kein Bild geladen wurde, 
steht dort nur »no file«. 

Als zweiter Teil kann das Fenster in der 
linken oberen Ecke bezeichnet werden, 
in dem die verschiedenen Menues an¬ 
gezeigt werden. Drei der Menuepunkte 
sind immer gleich: die Eins und die 
Zwei dienen zur Einstellung der 
Sprungweite des Cursor. Damit kann 
man zwischen weiten Sprüngen, die zur 
Überbrückung von Entfernungen die¬ 
nen können, und kleinen Einzelschrit¬ 
ten, die man bei hoher Zeichengenau¬ 
igkeit benötigt, wählen. 

Die Null dient jeweils zum Verlassen 
der einzelnen Menues. Nachdem ein 


Menue verlassen wurde, kehrt das Pro¬ 
gramm meist in das vorhergehende 
Menue zurück, teilweise erfolgt aber 
auch der Rücksprung zum Haupt- 
menue. 

Der Benutzer kann das Programm nicht 
einfach durch Drücken der Null im 
Hauptmenue verlassen, wenn er ir¬ 
gendwelche Zeichnungen gemacht hat. 
Er muß zuvor das Bild löschen. Dies 
schützt den Benutzer vor versehentli¬ 
chem Löschen von bereits gezeichneten 
Bildern. Wir werden später noch zu den 
einzelnen Menues zurückkommen. 
Der dritte Teil des Bildschirms besteht 
aus einer Positionsangabe des Cursors 
und einer Anzeige, die die Speicheraus¬ 
nutzung in Prozent angibt. Diese Pro¬ 
zentanzeige wird aber nur im Hauptme¬ 
nue an veränderte Verhältnisse ange¬ 
paßt. Die Anzeige für die Position des 
Cursors, die in Millimetern angegeben 
wird, wird dagegen bei jeder seiner Be¬ 
wegungen auf den aktuellen Stand ge¬ 
bracht. 

Die sehr hohe Genauigkeit des Pro¬ 
grammes wird dadurch deutlich, daß 
die Anzeige für die Cursorposition 
nicht auf Null steht, auch wenn der 
Cursor scheinbar auf dem »Nullpunkt«, 
der Mitte des »Blattes« steht. Die An¬ 
zeige der Cursorposition bezieht sich 
immer auf den Bildschirmpunkt, auf 
dem der Cursor wirklich steht. 

Doch nun zurück zu den verschiedenen 
Menues. Wenn wir mit dem Programm 
arbeiten wollen, so dürfen wir die Dis¬ 
kette nach dem Starten des Programms 
nicht aus dem Laufwerk entfernen, da 
das Programm die Funktionen für die 
verschiedenen Menues teilweise von 
Diskette nachlädt. Wir wollen nun die 
einzelnen Menues nicht im Detail be¬ 
sprechen, sondern die Fähigkeiten des 
Programms im ganzen aufführen: 
Wenn es darum geht, Punkte für ver¬ 
schiedene Funktionen festzusetzen, so 
steht ein Menue mit vielen verschiede¬ 
nen Funktionen zur Verfügung. Die 
Punkte können entweder auf der Cur¬ 
sorposition angenommen, direkt durch 
die Koordinaten bestimmt, durch Ein¬ 
gabe von Entfernung und Winkel, die 
sich auf einen zuvor definierten Punkt 
beziehen, durch bereits gespeicherte 
Punkte festgelegt oder durch einige 
weitere Funktionen. Mit Hilfe des Pro¬ 
gramms können sowohl Linien, Recht- 


und Vielecke, Bögen, Kreise und Ellip¬ 
sen als auch Tangenten an Kreise und 
Ellipsen gezeichnet werden. Die Art 
der Linien, die gezeichnet werden sol¬ 
len, kann verändert werden. Statt einer 
durchgezogenen Linie kann der Benut¬ 
zer auch eine Linie zeichnen lassen, die 
nur gestrichelt ist. Das Programm bie¬ 
tet noch einige weitere Zeichenmög¬ 
lichkeiten, die für technische Zeichner 
nützlich sein können. Was besonders 
hervorzuheben ist, ist die Möglichkeit, 
automatisch die Distanz zwischen zwei 
Punkten berechnen, zeichnen und die 
berechnete Distanz an den, vom Pro¬ 
gramm zuvor gezeichneten, Pfeil 
schreiben zu lassen. Außer den Zahlen, 
die das Programm an die Pfeile 
schreibt, kann der Benutzer auch Tex¬ 
te seiner Wahl in das Bild zeichnen las¬ 
sen. Dabei kann er die Größe der Buch¬ 
staben selbst bestimmen. Das Pro¬ 
gramm speichert jedoch nicht jeden 
einzelnen Punkt z.B. einer Linie, son¬ 
dern es speichert, um beim Beispiel zu 
bleiben, den Anfangs- und Endpunkt 
einer Linie. Dadurch kann das Pro¬ 
gramm wesentlich komplexere Bilder 
speichern, als dies durch die Speiche¬ 
rung einzelner Punkte möglich wäre. 
Die Position der x- und y-Achse kann 
ohne Probleme verschoben werden. 
Um hohe Detailtreue zu bekommen, 
besteht die Möglichkeit, einzelne Aus¬ 
schnitte des Bildes zu vergrößern. Den 
Ausschnitt und wie vergrößert werden 
soll, kann der Benutzer frei wählen. 
Leider treten beim Vergrößern von 
Bildschirmausschnitten zumeist Warte¬ 
zeiten auf, da das Programm den ge¬ 
samten Speicher durchsucht und be¬ 
rechnet, ob eine Linie, ein Kreis oder 
ein anderes Bildelement in dem ge¬ 
wählten Ausschnitt erscheinen müssen. 
Bei zunehmender Größe des Bildes 
wird die Wartezeit länger, ohne jedoch 
den Programmablauf wirklich störend 
zu unterbrechen. Im Zusammenhang 
mit der Möglichkeit, Ausschnitte zu 
vergrößern, sollten auch noch zwei 
weitere Möglichkeiten erwähnt wer¬ 
den. Zum ersten kann man in einen ver¬ 
größerten Ausschnitt Bilder einladen, 
die vom Programm automatisch in die 
richtige Relation zum gesamten Bild 
gebracht werden. 

Die zweite interessante Möglichkeit, 
die noch erwähnt werden sollte, besteht 
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Für einen richtigen Gangster ist der Knast das Allerletzte. Das 
Essen kann man vergessen, und der Rest ist auch nicht viel 
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darin, aus einem Bild einen Block her¬ 
auszugreifen. Dieser kann dann ver¬ 
schoben, gelöscht, gedreht, gespiegelt 
oder vergrößert werden. Die Aufzäh¬ 
lung der Möglichkeiten, die das Pro¬ 
gramm bietet, um ein Bild zu verän¬ 
dern, ist nicht vollständig, sondern stellt 
nur eine Auswahl der wichtigsten Mög¬ 
lichkeiten dar. Natürlich kann ein Bild 
auch ganz normal eingeladen und abge¬ 
speichert werden. Da ein Bild von z.B. 
einem Gebäude auf dem Bildschirm ei¬ 
nem Architekten an der Baustelle zu¬ 
meist nicht weiterhilft, werden zu dem 
eigentlichen Zeichenprogramm noch 
zwei weitere Programme mitgeliefert: 
Das eine dient zur Ausgabe von Zeich¬ 
nungen auf Plotter, das andere zur Aus¬ 
gabe auf Drucker. Der mitgelieferte 
Druckertreiber gibt auf einem EPSON- 
Drucker (oder einem kompatiblen 
Drucker) das gewünschte Bild aus. Da¬ 
bei wird das Bild auf DIN-A4-Größe 
ausgedruckt, auch wenn das Bild mit 
einem anderen Maßstab gezeichnet 
wurde. Der Treiber für Plotter, die die 
sogenannte »Hewlett Packard graphics 
Language« verstehen, ist etwas kompli¬ 
zierter. Nachdem sowohl der Compu¬ 
ter als auch der Plotter für eine Ausgabe 
vorbereitet wurden, kann das Pro¬ 
gramm aufgerufen werden. Hier kön¬ 
nen nun verschiedene Einstellungen 
vorgenommen werden, um die von Ih¬ 
nen gewünschte Zeichnung zu erhalten. 
Dabei wird der beim Entwurf der 
Zeichnung benutzte Maßstab auch zum 
Ausgeben des Bildes auf das Papier be¬ 
nutzt. 

Fazit: Dieses Programm ist für jeden, 
der sich mit technischem Zeichnen be¬ 
schäftigt, sehr reizvoll. Es bietet die 
Möglichkeit, Zeichnungen zu erstellen, 
die so präzise sind, als Menschen sie 
erstellen können. Viele Optionen, die 
das Programm bietet, erleichtern das 
schnelle und gute Erstellen von Zeich¬ 
nungen. Leider ist das mitgelieferte 
Handbuch, das die meisten Funktionen 
des Programms recht ausführlich be¬ 
schreibt, in Englisch geschrieben. 
Auch fehlen meiner Meinung nach zu 
manchen Menuepunkten weitere Erklä¬ 
rungen. 

Alles in allem ist dieses Programm gut 
gelungen und braucht einen Vergleich 
mit anderen Programmen dieser Art 
nicht zu scheuen. (A. Grass) 


CPC-MACRO 

Hersteller: Holtkötter 
Vertrieb: Firma Holtkötter GmbH 
Steuerung: Tastatur 
Monitor: Farbe/Grün 
Programm: 100% M-Code 
Preis: Kass. 98,— / Disk. 139,— 


Nui?ef<ekl Sedienungs Dokj- Grafik A/oeit» Preis' 

frsünai lenkeil mentalion g»»c*v»*iciig- Leistjng 



CPC 464 K CPC 6128 K 
CPC 664 K Joyce K 

Bei diesem Programm handelt es sich 
um einen unter CP/M 2.2 und CP/M 
3.0 laufende Macroassembler, der die 
volle Z80-Assemblersprache überset¬ 
zen kann. Macroassembler sind gene¬ 
rell dazu da, um das Programmieren in 
Maschinensprache so einfach wie mög¬ 
lich zu machen. Dabei unterscheiden 
sich Macroassembler von normalen 
Assemblern dadurch, daß sie die Pro¬ 
grammierung in der Assemblerspra¬ 
che, die allgemein als sehr schwierig 
und zeitaufwendig gilt, weiter verein¬ 
fachen, indem sie dem Programmierer 
Hilfsmittel zur Verfügung stellen, die in 
Assembler nicht vorgesehen sind. 

Der CPC-MACRO bietet eine Vielzahl 
dieser Hilfsmittel, die sonst nur aus 
Hochsprachen bekannt sind. Der Macro¬ 
assembler unterstützt strukturierte Pro¬ 
grammierung und stellt Anweisun¬ 


gen wie IF...ELSE...ENDIF oder 
CASE.. .OF... ENDOF.. .ENDCASE 
zur Verfügung, die an Stelle von 
Sprungbefehlen, mit denen diese Be¬ 
fehle in normalen Assemblern simuliert 
werden müssen, benutzt werden kön¬ 
nen. Bei der späteren Assemblierung 
werden diese Anweisungen automa¬ 
tisch in die entsprechenden Sprungbe¬ 
fehle umgewandelt. Der CPC-MACRO 
erlaubt auch die sogenannte bedingte 
Assemblierung, d.h., daß Programm¬ 
teile nur in Abhängigkeit von einer Be¬ 
dingung assembliert werden. Somit 
können voneinander unterschiedliche 
Programmversionen aus demselben 
Quellcode automatisch erzeugt werden, 
wenn dies z.B. die Hardware verlangt. 
Um Programme besser verständlich zu 
machen, können Zahlen und Sprung¬ 
adressen durch Worte ersetzt werden, 
die maximal 28 Zeichen lang sein dür¬ 
fen. Diese Worte müssen nicht für das 
gesamte Programm, sondern können 
auch für einzelne Blöcke des Program¬ 
mes definiert werden. Der Name des 
Macroassemblers kommt aber von der 
Möglichkeit, häufig benutzte Befehls¬ 
folgen als sogenannte Macros zu defi¬ 
nieren. Dabei wird die Befehlsfolge ein¬ 
mal mit einem Namen versehen einge¬ 
geben und wenn sie später im Pro¬ 
gramm benötigt wird, so genügt es, den 
Namen einzugeben. An Macros kön¬ 
nen natürlich auch Parameter überge¬ 
ben werden. Bei der Assemblierung 
wird der Name wieder durch die Be¬ 
fehlsfolge ersetzt. Der sehr umfangrei¬ 
che Befehlssatz der Macrosprache wird 
durch die laut Handbuch einzigartige 
Möglichkeit, Operatoren und Funktio- 
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nen, die zur Berechnung von Aus¬ 
drücken notwendig sind, tabellarisch an 
Macros zu übergeben, ergänzt. Damit 
können Sie auf einfachste Art und Wei¬ 
se eigene Compiler schreiben. 
Generell muß gesagt werden, daß die 
benutzte Macrosprache das Erstellen 
von eigenen Compilern für verschiede¬ 
ne Programmiersprachen sehr verein¬ 
facht. Als Beispiel ist ein Tiny-BASIC 
enthalten, das in der deutschen Anlei¬ 
tung sehr gut beschrieben ist und das 
sehr leicht zu einem vollständigen BA¬ 
SIC mit vielen neuen und eigenen Be¬ 
fehlen ausgebaut werden kann. Zusätz¬ 
lich dazu kann man mit dem Assembler 
einzelne Teile eines Programmes nach¬ 
einander zu einem ganzen Programm 
assemblieren. Dies ist besonders inter¬ 
essant, weil das gesamte Assemblersy¬ 
stem mit allen bereits assemblierten 
Programmen und der gesamten Sym¬ 
boltabelle, in der festgelegt ist, welcher 
Name in einem Programm welche Be¬ 
deutung hat, abgespeichert werden 
kann. Nachdem das System dann er¬ 
neut gestartet wurde, kann weitergear¬ 
beitet werden, ohne daß zuvor schon 
einmal assemblierte Programme erneut 
eingeladen und assembliert werden 
müssen. Das Abspeichem des Quellco¬ 
des erfolgt auf eine etwas ungewöhnli¬ 
che, doch von Holtkötterprogrammen 
schon gewohnte Weise: Mit Hilfe eines 
komfortablen, bildschirmorientierten 
Editors werden die Programme in so¬ 
genannte Screens eingegeben. Diese 
werden auf einer Diskette, die nur zum 
Speichern dieser Screens benutzt wer¬ 
den kann, abgelegt. Auf der Diskette 
finden ISO Screens Platz. 


Der Editor wird automatisch einge¬ 
schaltet, wenn ein Fehler auftritt. Zu¬ 
vor wird die Fehlernummer am Bild¬ 
schirm angezeigt, und nachdem eine 
Taste gedrückt wurde, schaltet das Pro¬ 
gramm den Editor auf der Screen ein, 
in der der Fehler aufgetreten war. Der 
Cursor wird an die Stelle gesetzt, wo 
der Assembler den Fehler erkannt hat. 

Unterprogrammbibliotheken können 
vom Benutzer selbst angelegt werden. 
Dabei übernimmt der Assembler nur 
die Unterprogramme, die für die Lauf- 
fahigkeit des Programms benötigt wer¬ 
den und spart somit selbständig Spei¬ 
cherplatz. 


Fazit: 

Dieser Macroassembler von Holtkötter 
ist wieder ein sehr gut gelungenes Pro¬ 
gramm. Das umfangreiche, gute Hand¬ 
buch ist in Deutsch geschrieben und er¬ 
leichtert die Arbeit mit dem CPC- 
MACRO. Dabei geht das Handbuch 
nicht auf die Programmierung in As¬ 
sembler ein, sondern zeigt dem Benut¬ 
zer, wie er mit den Besonderheiten des 
Assemblers umzugehen hat. 

Ein Schwerpunkt liegt auf der Macro¬ 
sprache des Assemblers, wobei das 
Handbuch am Beispiel des Tiny- 
BASICs dem Benutzer zeigt, wie man 
Compiler und andere Programme 
schreibt. 


Alles in allem ein sehr gutes Pro¬ 
gramm, das durch kleinere Extravagan¬ 
zen wie z.B. die Abspeicherung von 
den Assemblerprogrammen nur positiv 
auffallt. 


(A. Grass) 


File-Mover 

Hersteller: SSR 
Vertrieb: SSR 
Steuerung: Tastatur 
Monitor: Farbe/Grün 
Programm: CP/M 2.2 
Preis: 98,- DM 


Nulzelfeki Beäianjngs- Doku- Grarik Arbeits- Preis/ 

freundlichkell mentalior gescnwirvdig- Leistung 

bäil 



CPC 464 KJ CPC 6128 KJ 
CPC 664 Kl Joyce K 

»File-Mover«, so heißt das neue Pro¬ 
gramm für die CPC-Rechner von der 
Firma Software Service Rethemeier. 
Mit diesem Utility-Programm können 
Sie Files von einem anderen CP/M 2.2 
Rechner auf den Schneider CPC über¬ 
tragen. 

Die ganze Übertragung erfolgt über 
eine RS232-Schnittstelle, die am 
Schneider vorhanden sein muß. Hier 
ergibt sich jedoch schon das erste Pro¬ 
blem. Da das Programm unter CP/M 
betrieben wird, muß die RS232- 
Schnittstelle im CP/M eingebunden 
sein, d.h., das CP/M-Betriebssystem 
muß diese als Puncher oder Reader an¬ 
sprechen können. Die Schnittstelle von 
Schneider eignet sich hierfür ohne die 
entsprechende Treibersoftware jedoch 
nicht. Mir sind zwei RS232-Schnitt- 
stellen bekannt, die sich auch unter 
CP/M ansteuem lassen. Das wäre zum 
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einen die Vortex Schnittstelle und die 
original Amstrad Schnittstelle. Da auf 
der Programmdiskette des File-Movers 
keine Anpassungsprogramme für ande¬ 
re Schnittstellen vorhanden sind, eignet 
sich File-Mover auch nur für Besitzer 
einer der aufgezählten Schnittstellen. 

Um nun ein Programm zu übertragen, 
muß der CP/M 2.2 Fremdrechner mit 
dem Schneider CPC über die 
RS232-Schnittstelle mit einem entspre¬ 
chenden Kabel verbunden sein. Der 
Fremdrechner, der in unserem Beispiel 
als Sender dient, benötigt jetzt ein ent¬ 
sprechendes Programm, mit dem er 
den zu übertragenden File an den CPC 
senden kann. Hierfür muß auf das Pro¬ 
gramm PIP, welches sich auf der Sy¬ 
stemdiskette befindet, zurückgegriffen 
werden. Die Anleitung beschreibt die¬ 
sen Vorgang exakt. Wurde das Pro¬ 
gramm auf den Fremdrechner übertra¬ 
gen, kann man mit der Übertragung der 
Files beginnen. Auf der mitgelieferten 
Diskette befinden sich fünf Programm¬ 
files. Je ein Sende- und Empfangspro¬ 
gramm für den Schneider CPC, sowie 
für den fremden CP/M 2.2 Rechner. 
Das Empfangsprogramm befindet sich 
noch einmal im »Intel-Hex« Format auf 
der Diskette. 

Die beigefügte Anleitung zu »File- 
Mover« gibt reichlich über das Pro¬ 
gramm Auskunft. 

»File-Mover« ist besonders für Anwen¬ 
der interessant, die CP/M-Programme 
auf den Schneider CPC übertragen 
wollen. Aber auch andere Programme 
oder sogar Texte können bequem mit 
File-Mover übertragen werden. Etwas 
mehr Bedienerfreundlichkeit wäre 
wünschenswert gewesen. Sieht man 
darüber hinweg, ist »File-Mover« gera¬ 
de für »CPC Umsteiger« zu empfehlen. 

(Christian Eißner) 

Public Domain 

Hersteller: Public Domain 

Vertrieb: Martin Kotulla 

Preis: DM 3” 20,—/DM 15,— Vortex 

Wie bereits in Ausgabe 1/S7 erwähnt, 
werden wir in unregelmäßigen Abstän¬ 
den Programme der Public-Domain 
vorstellen. Den Anfang macht das Uti¬ 
lity »Squeeze«, ein nützlicher Bestand- 
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teil einer von vielen Public-Domain 
Disketten. 

SQ und USQ: Wohl jeder Computerbe¬ 
nutzer mußte schon die leidvolle Erfah¬ 
rung machen, daß der freie Speicher¬ 
platz auf Disketten immer zu klein ist. 
Besonders Besitzer einer 3”Floppy mit 
rund 180 KByte stoßen recht schnell an 
die Grenzen der Speicherkapazität ih¬ 
rer Laufwerke. 

Wie schön wäre es doch, wenn man 
Dateien komprimieren könnte, so daß 
sie weniger Platz benötigen, aber wei¬ 
terhin dieselben Informationen enthal¬ 
ten! Sie glauben, das geht nicht? Nun, 
dann sind die Programme SQ und USQ 
genau das Richtige für Sie! 

Der Amerikaner David Huffman hat 
schon im Jahr 1952 erkannt, daß sich in 
Dateien Bitmuster häufig wiederholen 
und deshalb durch kürzere Codes er¬ 
setzt werden können. Der Spareffekt 
hängt mit der Art der Dateien zusam¬ 
men, die komprimiert werden sollen. 
Während COM-Files und andere Bi¬ 
närdateien durchschnittlich um fünf bis 
zehn Prozent kürzer werden, ist die An¬ 
wendung von SQ bei Textdateien viel 
eher anzuraten. Hier liegt die Einspa¬ 
rung bei durchschnittlich 46 Prozent, es 
können aber auch schon einmal 60 bis 
70 Prozent erreicht werden. Unter Text¬ 
dateien versteht man hier nicht nur 
Briefe und Dokumente, sondern auch 
Quellcodes von Programmen etwa in 
Pascal, C oder Maschinensprache. 

Besonders kraß ist das Verhältnis zwi¬ 
schen Original und komprimierter Da¬ 
tei bei Binärdateien, die Bildschirmgra¬ 
fiken enthalten. So wurde aus einer 
speicherplatzfressenden 17K-Datei bei 
mir ein File mit immerhin drei KByte. 


Die Anwendung von SQ (diese Abkür¬ 
zung steht übrigens für »Squeeze«, auf 
Deutsch »quetschen«) ist denkbar ein¬ 
fach. Sie nennen in der Kommandozei¬ 
le von CP/M nach dem Namen SQ le¬ 
diglich den Namen der Datei, die kom¬ 
primiert werden soll: 

A>SQ TEXT.TXT 

SQUEEZE nimmt dann seine Arbeit 
auf und gibt Meldungen über den Fort¬ 
gang aus. Da das Programm im Quell- 
code für den in Deutschland nur sehr 
schwierig erhältlichen BDS-C-Com- 
piler geschrieben ist, konnte ich den 
Bildschirmdialog nicht aus dem Engli¬ 
schen übersetzen. Aber Sie kommen 
mit SQUEEZE garantiert auch ohne 
Englisch-Kenntnisse zurecht. 

Damit Sie normale und komprimierte 
Dateien unterscheiden können, setzt 
SQ automatisch beim zweiten Zeichen 
der Namenserweiterung ein »Q« ein. So 
wird aus TEXT.TXT nun TEXT.TQT 
oder aus PROG.ASM der Name 
PROG.AQM. 

Natürlich können Sie eine komprimier¬ 
te Datei nicht so ohne weiteres benut¬ 
zen. Sie muß erst wieder entschlüsselt 
werden. Das Verfahren eignet sich also 
nicht besonders für ständig benötigte 
Fües, sondern ist gedacht für Dateien, 
die nur von Zeit zu Zeit gebraucht 
werden. 

Zur Decodierung können Sie das Pro¬ 
gramm USQ.COM (»Unsqueeze«) her¬ 
anziehen. Der Aufruf erfolgt ebenso 
wie bei SQ: 

A>USQ TEXT.TQT 

Es entsteht wieder die Originaldatei 
TEXT.TXT. Die Dekomprimierung 
geht sehr schnell vonstatten, da das 
Programm — wie erwähnt — purer 
Maschinencode ist. 

Sowohl SQ und USQ können Sie auch 
ohne einen Dateinamen als Parameter 
aufrufen. Dann erhalten Sie in einer 
Hilfsmeldung einen kurzen Überblick 
über die Funktionsweise der Program¬ 
me und gelangen in einen interaktiven 
Modus, in dem Sie mehrere Dateien 
auf einmal ver- oder entschlüsseln kön¬ 
nen, ohne jedesmal SQ oder USQ neu 
laden zu müssen. Diese Betriebsart 
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Footballer of the Year 

CBM 64/I28. Anurtrad. MSX. Spectrum. 
Atari. BBC Dvctnin. CI6 plus 4. 
C8M 64/128 & Amstrad (diac) 

Future Knight /, 
I \ CBM 64/128. Amatrad. 
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/ Avenger \ 

/ Spectnim, C16 plus 4. \ 

CBM 64/128. Amatrad, MSX. \ JÄ 
CBM 64/128 & Amatrad (dUc> 

Trailblazer 

CBM 64 128. Amatrad, MSX. Spectnim. 

CI6 plua 4. CBM 64/128 & Amatrad |dlac) 
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of the Year 


I las Sjiri. di' du ijelirimni iittnbaim gik> mamilichrii 
Wr«ens erfulli dir Chanut -sich einen Narnen unter den 
gun«. grußeii KuWallrm /u niarlum' her l'yahnge "Lehrling 
l«Wnnl seinen AnWetg «um Prob und erlel« eine ruhimvuhe 
Kötnern mit all dem ('Jan* und den lulleren Enttäuschungen der 
rjettKen Begegnungen den ThiiMer-Aligeholen den VerMzuugen 
und allein was (tun nein in Slellen Sir Ihr Talent unier Hewei' in 
der FuBhaH-Ligd. den UE FA FA und Milk Cup Cpielen und. wer 
weiß vielleicht haben Sie wirklich das Zeug «um Fuldviiler des jalirrs ' 


Erhelle Dieli Sir Kandnl|ih. und mache Dich aul den \Mä| zur 
Erratung der liebln heu Maid Amelu die in die pausigen Klauen 
wm Sprtinli dem St hrecklichen ger.mit ist Nach Empfang 
uilenlimensiiuuien Vlvguib vom ipldkbsthen Knuiat SS Kusltiuckrt 
isi |ede Minute entscheidend Zieh Deinen Ommbnlt Mark IV 
Angriffsanzung über und nimm die Veifidguitg der Entführer auf. ehe 
IVmr Gelietoe für immer entschwindet Deine waghaLsige Jagd fuhrt (tan h 
211 vhredini<eTre$wde Kturnen auf die Überfläche des Planeten und 
schließlich in Spebolls Festung wi das Schmcksal Deiner Amrlia wmi 
Wgang des liHllnhen Kamples iml dem lim hlluieu Heiu Imrinud .Jihamj 


Future Knight 


Fs begann mii' THF. V»A> I )F THF TIGER dem klassisirhen Kriegskuiw- 
V'ideiMlienleuer, wnesdirum ging, sich durrli physische Fertigkrilfti zum Ninia 
II) em|Kirzukamp(en .IrtztsiillslDuauchlXsiiehemirraiiendeugeLsligenFaliiiiki'ilen 

unier Kiwis slellen. in dem nun vi »bergenden ««eilen Teil der Geschichte vnm 
Wn des Tu|ers dem l.iszmierenrisleii Arkartes|uel ulierhaupt tatmon. der 
(iniKiiieisler der Flammen lial Deinen AdnplivV,«cr Naiiishi ermordet Du hast dem 
Gott Kwun gcv Immen diesen MeurlMmoid zu rächen und die geheiligten ftrgamen 
Imlleii zunn kzuemhem I m dieses Ziel «uerres lieil wird Du alle fkineGesdnckliihkril 
IVmen Kampfesmul und gule Nerven hranrhen lnsouders wenn Du den letzten Konflikt 
Mieridulierdeli.il willst Das GIih k wi mi! Dir (Nieder dessen Her« wdl Mul ist. kann neuen 


Eine ha Wirre bensche (Usern inst ngew ist eine Fahrt, auf der man si|iervrhnelle 
KeaklNinen brauchl - ganz gewiß nichts für Angsthasen Rolle nach links und 
nach rechts, um den endlosen Abgunden auszuweu heu. die sich nmd um die 
geheimnisvollen (Juadnite auftun. Flachen, die Deinen Fortrangaul vielerlei Weise 
iiehindem. manchmal aber auch Deine rasende Fahrt noch beschleunigen oder Dich 
zu einem Sprung zwingen Laß die Ihr mehl aus den Augen g? schneller Du au Dem 
Ziel gelangst desto höher Deine Prämie 


Trailblazer 


Zzap Sizzlers 

(Commodore 64/128) 

Z — Monty on the Run 
— Bounder — Starquake 


Amtix Accolades 

(Schneider CPC) 

Monty on the Run — Sweevo’s 
World — Bounder — Starquake 


MSX Classics 

(MSX-Coraputer) 

Grog’s Revenge — Gunfright — 
Valkyr — Bounder 


Vorsicht vor Grauimporten! 

Bitte prüfen Sie schon beim Kauf, ob die¬ 
ses Programm wirklich eine deutsche An¬ 
leitung enthält. Spätere Reklamationen 
können leider nicht berücksichtigt werden. 


C 16 Classics (C 16/Pius 4) 

Sword of Dcsliniy — Jetbrix — 
Gullwing Falcon — Reach for 
the Sky — Xargon’s Revenge — 
Dork’s Dilemma 


Gremlin Graphics Software, An der Gümpgesbrücke 24, 4044 Kaarst 2 
Vertrieb: Rushware Mitvertrieb: fmiCtO-mSifllMi! Distribution in Österreich: Karasoft 


Gremlin Graphics Software erhalten Sie in den I 


i von g und in allen gulsortierlen I 
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kennen Sie bestimmt von PTP.COM, 
wenn Sie dieses Programm ohne Para¬ 
meter aufrufen. Die Diskette enthält 
noch weitere, sehr nützliche Tools, de¬ 
ren Auflistung hier allerdings zu viel 
Raum beanspruchen würde (siehe Di¬ 
rectoryausdruck). 

(RK/SR) 

E.M.U. 

Hersteller: Picturesque 

Vertrieb: Gremlin Software 

Monitor: Farbe/Grün 

Steuerung: Tastatur 

Programm: 100% M-Code 

Preis: Kass. ca. 50,—/Disk. ca. 60,— 

Nulzellekl Beoicnungs Doku- Graf k Arbeils- PreiB/ 
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CPC 464KJ CPC 664IS CPC 6128K 

Der Schneider CPC besitzt einen lei¬ 
stungsfähigen Soundchip. Jedoch ist es 
nicht jedermanns Sache, Musik oder 
Soundeffekte zu programmieren, da 
man hierfür auch über etwas »Musik¬ 
grundwissen« verfügen muß, um ein 
Musikstück auf dem Schneider CPC 
komponieren zu können. 

Gremlin Software hat nun mit »The 
Electronic Music Utility«, kurz 
E.M.U., Abhilfe geschaffen. 

Da E.M.U. sehr übersichtlich und be¬ 
nutzerfreundlich aufgebaut ist, kann 
man selbst schon ohne Anleitung erste 
Versuche mit dem Programm unterneh¬ 
men. Die Menuesteuerung erfolgt 
hauptsächlich über die Cursortastatur. 
Die Eingabe von Musik ist denkbar ein¬ 
fach . Das einzige, was man zum Pro¬ 
grammieren eines Musikstückes benö¬ 
tigt, ist ein Notenblatt mit dem ge¬ 
wünschten Lied. Jetzt müssen nur noch 
die Noten »abgetippt« werden — fertig. 
E.M.U ist nicht nur für den Musiklai¬ 
en eine große Hilfe, sondern selbstver¬ 
ständlich auch für den Hobbykomponi- 
sten, der eigene Stücke am Computer 
»entwerfen« will. Die drei Musikkanä¬ 


le, die der CPC-Soundchip besitzt, 
werden voll ausgenutzt. 

Sind die Noten gespeichert, so kann 
man nun darangehen, das Klangbild der 
Töne zu verändern. Da der Entwurf der 
ENT- und EN V-Kurven grafisch darge¬ 
stellt ist, braucht man auch hier kein 
Musikexperte zu sein. 

»Voices« ist die nächste interessante Ei¬ 
genschaft von E.M.U. Mit »Voices« 
können Sie sich beliebige Instrumente, 
wie Schlagzeug oder Trompete, pro¬ 
grammieren. Wie bei den anderen 
Funktionen, wird auch die Program¬ 
mierung von »Voices« grafisch unter¬ 
stützt. Auf der Programmdiskette be¬ 
finden sich zahlreiche Musikstücke zur 
Demonstration. Und damit man nicht 
so lange tüfteln muß, bis man den Ton 
eines Instrumentes entworfen hat, sind 
zahlreiche Töne schon zusammenge¬ 
mixt. Ist nun das Musikstück fertig, 
kann es, wenn gewünscht, in eigene 
Programme eingebunden werden. 
E.M.U. verfügt für diesen Zweck über 
zahlreiche RSX-Kommandos, so daß 
auch der BASIC-Programmierer voll 
auf seine Kosten kommt. 

Das Musik-Utility E.M.U. ist sowohl 
auf Kassette als auch auf Diskette lauf¬ 
fähig. 

E.M.U. gehört zu den wichtigsten Uten¬ 
silien für Hobbykomponisten oder Spie¬ 
leprogrammierer. Mit E.M.U wird das 
Komponieren zum Kinderspiel, auch 
für Leute, denen das Wort Musik ein 
Fremdwort ist. (Christian Eißner) 



Infiltrator 

Hersteller: US-GOLD 
Vertrieb: Fachhandel 
Steuerung: Joystick/Tastatur 
Monitor: Grün/Farbe 
Programme: 100% M-Code 
Preis: ca. 49,— DM 


Sp*>«3«a Badienungs- Doku- Gralik Sounc °r*.y 

IreundlichkeH menlaUon L«HWu"Q 



CPC 464 K CPC 6128 K 
CPC 664 K Joyce K 

Ich weiß nicht warum, aber als ich fünf 
neue Spiele zum Testen auf den Tisch 
bekam, griff ich als erstes »Infiltrator« 
raus. 

Da sieht man doch einmal wieder, was 
eine gute Verpackung ausmacht! Das 
Cover mit dem Schriftzug »The Game 
that rockcd America« und dem Piloten 
vorne drauf, ließ sich anfangs nicht so 
recht einordnen. Schließlich tippte ich 
dann doch auf Simulation, auch wegen 
der Screen-Shots auf der Rückseite, da 
ist nämlich der Blick aus einem Cock¬ 
pit zu sehen. Verwirrend waren da nur 
die beiden anderen Bilder, die eher auf 
Action-Adventure hindeuteten. Ich be¬ 
schloß, der Sache auf den Grund zu ge¬ 
hen. Innen war auf dem Cover eine spe¬ 
zielle Kurzanleitung für den CPC ge¬ 
druckt, eine ausführlichere, aber für 
mehrere Computer geschriebene, lag 
zusätzlich noch dabei. 

Beim Auseinanderfalten dieser Anlei¬ 
tung war ich erst einmal geschockt. Das 
beidseitig recht klein beschriebene 
35 x 35 cm Blatt sah sehr nach Simula¬ 
tion aus. Beim Lesen wurde die Ange¬ 
legenheit dann klar: Bei »Infiltrator« 
handelt es sich sowohl um eine Simu¬ 
lation als auch um ein Action- 
Adventure. 

Sie verkörpern in diesem Spiel Johnny 
McGibbits, auch »Infiltrator« genannt, 
eine Art moderner Superheld, der nicht 
nur Ballistik- und Karate-Experte, son¬ 
dern auch noch Politiker, Hubschrau¬ 
ber-Pilot, Ingenieur, Nervenarzt, 
Schauspieler, Rock-Star, Motorrad- 
Ass, Forscher und was-weiß-ich noch 
alles ist. 

Gerade noch mit der Einweihung des 
neuen McGibbs Flügels der Kongreß¬ 
bibliothek beschäftigt, werden Sie be¬ 
auftragt, einen verrückten Führer, 
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Bunt gemischtes 
Anwender-Paket für 
den Joyce-Texter: 

Buch + Diskette 
mit Wort-Experimenten, 

Tips und Tricks, einem Layout- 
Archiv, dem LocoScript-Software- 
Training, literarischen Text-Beispie¬ 
len, »historischen Simulationen, Insider- 
Plaudereien und feuilletonistischen Ab¬ 
wegen«, theoretischen Notizen und vie¬ 
les mehr. 

Ein Wegweiser durch die Welt der Text¬ 
verarbeitung. 

Abwechslungsreicher Lesestoff für Neu¬ 
linge und Fortgeschrittene, der über die 
Grenzen des Computerschreibtischs hin¬ 
ausführt. 


Auf Diskette: 

1. Der »LocoSript-Zettelkasten« 

bietet direkten Zugriff auf zahlreiche 
LocoSript-Standard-Schablonen in 
über 50 Dateien. 

Dazu: Mustertexte, Editierübungen, 
Schriftbeispiele, Serienbriefe, 
Spaltendruck, Tabellen, Telefon¬ 
register, typografische Experimente, 
Text-Kostproben, und vieles mehr. 


2. WordStar-Tastendefinitionsdatei 

mit Referenzkarte, WS-Stapeldatei für 
Startdiskette (beides individuell anzu¬ 
passen). 


JÜRGEN SIEBERT 

PRAKTISCHE 
TEXTVERARBEITUNG 

MIT 

JOYCE 




Buch + Diskette 

für LocoScript und WordStar-Autoren 

210 Seiten, Einband: Leinen-Hardcover 
Buch und 3”-Diskette zum Preis von 89,- DM 
(unverbindliche Preisempfehlung) 

Zu beziehen über den Computerhandel und den guten Fachbuchhandel 
oder direkt beim Verlag. Händleranfragen erwünscht. 

DMV Verlag • Fuldaer Straße 6 • Postfach 250 • 3440 Eschwege 


3. 


LOGO- und BASIC-Programme 

zur Erstellung computergenerierter 
Sätze und Gedichte. 


— Bitte Bestellkarte benutzen — 
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(nein, nicht der!), der die Welt in die 
Luft jagen will, zu stoppen. 

Nachdem Sie Ihr Klavierkonzert in E 
beendet haben, schwingen Sie sich auf 
Ihren Feuerstuhl mit Sitzheizung und 
wärmesuchenden Flugkörpern (halt ’ne 
heiße Maschine) und düsen zu Ihrem 
Landsitz. Dort legen Sic dann die ech¬ 
ten McGibbits Trimm-Fit kugelsiche¬ 
ren Jeans an, holen den Hubschrauber 
aus dem Stall und klemmen sich hinter 
den Steuerknüppel. 

Während des Ladens wird ungefähr 
nach der Hälfte ein Screen eingeblen¬ 
det, auf dem Sie in Telegramm-Form 
den genauen Auftrag beschrieben be¬ 
kommen. Zuerst sollen Sie zum Haupt¬ 
quartier des Führers (wie sich das 
schon anhört!?!) fliegen und dort unbe¬ 
merkt Dokumente fotografieren. Das 
Programm meldet sich dann nach dem 
Laden gleich mit dem Cockpit des 
Hubschraubers, der übrigens von 
Whizbang Enterprises stammt, für die 
McGibbits natürlich auch Reklame 
macht (»Ich liebe diese Sitze... .Werde 
ich dafür bezahlt?«). Diese Wunderma¬ 
schine ist mit allerlei Extras ausführlich 
in der Anleitung beschrieben, sie sind 
allerdings für das Spiel völlig irrele¬ 
vant. Das verwirrt alles anfangs sehr, da 
auch die Anleitung die Tastenfülle nur 
für den 64-er übersichtlich darstellt und 
die Tasten für Schneider und Spectrum 
in Klammem dahinter gestellt wurden. 

Insgesamt betrachtet ist die Flugse¬ 
quenz der schwächste Teil des Pro¬ 
gramms, sowohl fliegerisch als auch 
vom Spielwitz her. Dauernd muß man 
mit anderen Maschinen funken, was 
den Ablauf erheblich stört und schnell 
anödet. Dazu kommt noch, daß man ei¬ 
gentlich nicht richtig das Gefühl ver¬ 
mittelt bekommt zu fliegen! Der Hori¬ 
zont bleibt immer gerade und einen 
Gegner ins Fadenkreuz zu kriegen, ist 
fast unmöglich. Sind Sie schlußendlich 
nahe des Hauptquartiers gelandet, müs¬ 
sen Sie erst einmal den zweiten Teil 
nachladen. 

Ist dies geschehen, gilt es nun, ausge¬ 
rüstet mit Schlafgas, Minendetektor, 
Sprengstoff, falschen Papieren und ei¬ 
ner Kamera das Lager nach den Doku¬ 



menten zu durchforsten, was gar nicht 
so einfach ist, da es von Wachen nur so 
wimmelt, die alle Ihre Papiere sehen 
wollen. 

Dann kommt es darauf an, ob sich die 
Wache täuschen läßt oder ob sie Ver¬ 
dacht schöpft. Im letzteren Fall be¬ 
kommt sie halt eine Ladung Schlafgas. 
Auf dem Gelände stehen mehrere Ge¬ 
bäude, in denen man sich ebenfalls Um¬ 
sehen kann. 

Hat man ein Haus betreten, wechselt 
der Bildschirm, der sich dann wie folgt 
gliedert: Der obere Teil zeigt den 
Raum, in dem Sie sich befinden, in 3D, 
frontal und leicht von oben. Im mittle¬ 
ren Teil befindet sich ein Textfenster für 
Mitteilungen wie z.B. Funde und die 
verbleibende Zeit. Darunter zeigt eine 
Übersichtskarte aller schon betretenen 
Räume, je nach Wichtigkeit farblich 
unterschieden. In den verschiedenen 
Räumen befinden sich Truhen (mit den 
unmöglichsten Sachen drin), Akten¬ 
schränke, Uniformen und zum Teil 
auch verschlossene Türen und Wachen, 
die es gar nicht gerne sehen, wenn Sie 
einen Aktenschrank nach Brauchbarem 
durchsuchen. Werden Sie von einer 
Wache enttarnt, folgt auf dem Bild¬ 
schirm ein fest vorgegebenes Verhör — 
aber wir wollen ja nicht alles verraten. 
Haben Sie alle Dokumente fotografiert, 
geht es zurück zum Hubschrauber; ra¬ 
ten Sie mal, was dann folgt — das La¬ 
den von Teil 3, der so ziemlich Teil 1 
entspricht. 

Da fliegen Sie dann zur nächsten der 
insgesamt drei Missionen usw.... 

Ich muß sagen, »Infiltrator« hat meine 
Erwartungen nicht so ganz erfüllt. Das 


Nachladen ist bei der mir vorliegenden 
Kassettenversion zwar lästig, braucht 
aber nicht ewig, wie z.B. bei den Win¬ 
ter Games. Die Grafik ist insgesamt 
recht passabel, dafür ist soundmäßig so 
gut wie nichts los. Gerade bei der Flug¬ 
sequenz hätte man einiges spannender 
machen können — die Bodenmissionen 
sind da doch gelungener. 

Das beste an dem ganzen Spiel ist ei¬ 
gentlich die sehr umfangreiche und hu¬ 
morvolle Anleitung. Ich möchte bloß 
wissen, wer sich die McGibbits Zitate 
ausgedacht hat, er muß auf alle Fälle 
was für Sarkasmus übrig haben. 

Und nun noch ein letztes Wort von 
Johnny selbst: »Jede Mission ist erst 
vorbei, wenn ich etwas für meine Mühe 
erhalte. Hmmmm, ich hab mir schon 
lange die kleine Insel im Pazifik ge¬ 
wünscht...... (BB,HS) 

Glider Rider 

Hersteller: Quicksilva 
Vertrieb: Fachhandel 
Steuerung: Joystick/Tastatur 
Monitor: Farbe/Grün 
Programm: 100% M-Code 
Preis: ca. 29,- DM 
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Die Handlung könnte aus einem James 
Bond Film stammen: Eine mysteriöse 
Firma namens Abraxas, mit Hauptsitz 
auf einer künstlichen Insel, mischt eif¬ 
rig auf dem internationalen Waffen¬ 
markt mit. Durch ihren Slogan »Waf¬ 
fen, egal für wen, wohin, aus welchem 
Grund und welcher Qualität« wurde 
auch die Staatsgewalt schnell auf sie 
aufmerksam, der diese Art von Ge¬ 
schäften natürlich gar nicht gefallt. 

Es wird ein Geheimdienst beauftragt, 
sich der Sache anzunehmen. Unter al¬ 
len in Frage kommenden Organisatio¬ 
nen wurde schließlich die »Silent But 
Deadly«-Einheit ausgewählt, deren 
Mitglied Sie sind. Als Sie sich dereinst 
freiwillig gemeldet hatten, dachten Sie, 
man könne sich die Missionen aussu¬ 
chen und somit Aufträge, die nahe am 
Selbstmord liegen, umgehen. Die 
Army sieht das allerdings gaaaaaanz 
anders. Natürlich wird Ihnen versi¬ 
chert, daß es sich hierbei um die ein¬ 
fachste Mission Ihrer Laufbahn handle, 
doch schon die Höhe der Anerken¬ 
nungs-Prämie, die nach der Ausfüh¬ 
rung winkt, läßt Sie stutzig werden. 
Ihr Beschluß steht fest: So oder so, die¬ 
ser Auftrag wird der letzte sein. Entwe¬ 
der Nationalheld oder Staatsbegräbnis. 
Der Plan Ihres Chefs sieht folgender¬ 
maßen aus: Um die mit Radar und So¬ 
nar gesicherte Insel mit möglichst we¬ 
nig Verlusten erobern zu können, wer¬ 
den Sie mit einem Flugdrachen voraus 
geschickt. Ausgerüstet mit dem ultra¬ 
leichten, zusammenklappbaren Dra¬ 
chen, einem zerlegbaren Fahrrad mit 
Motor und neun Granaten sollen Sie 
nun dem Gegner den Strom abdrehen. 
Da das Hauptgelände zu stark geschützt 
ist, halten Sie sich an die zehn externen 
Reaktoren, die jeweils nur durch einen 
Boden/Luft-Laser geschützt sind. 
Wenn dann im Hauptgelände die Lich¬ 
ter ausgegangen sind, treffen Sie sich 
mit einem U-Boot, welches nun den 
Rest besorgt. Insgesamt haben Sie nur 
eine halbe Stunde Zeit, da das U-Boot 
nicht länger unter Wasser sein kann. 
Also, ich muß schon sagen, beim ersten 
Spiel hat es mich fast vom Stuhl geris¬ 
sen. Zuallererst der Sound, der zu dem 
besten gehört, was ich bisher auf mei¬ 
nem Composter laufen hatte. Sogar aus 
dem eingebauten Lautsprecher klingt 
die Sache gigantisch, aber erst über die 



Anlage! Mir sind wirklich die Ohren 
abgefallen. Mir soll nochmal ein 64-er 
Freak über den Weg laufen, der be¬ 
hauptet, daß der CPC an Sound nichts 
auf der Pfanne hat! 

Die Grafik ist nicht gerade farbenfroh, 
aber sehr detailliert. Die reine Freude, 
auch am Grünmonitor. 

Das Spiel beginnt mit der Landung auf 
der Insel, deren Oberfläche schräg von 
oben dreidimensional dargestellt ist. 
Der Übergang zum jeweils nächsten 
Bild ist als Querschnitt dargestellt, was 
dem Spieler zum einen Einsicht in die 
Konstruktion der Insel gewährt und 
zum anderen die Höhenstruktur ver¬ 
deutlicht, was bei der terrassenartigen 
Struktur des Geländes bitter nötig ist. 
Durch diesen »Trick« kann man dann 
nämlich auch die verdeckten Hänge 
recht gut abschätzen. Auf der Insel un¬ 
bemerkt gelandet, wird erst einmal der 
Drachen mit dem Fahrrad ausge¬ 
tauscht, mit welchem Sie sich recht un¬ 
gestört bewegen können. Haben Sie ei¬ 
nen Reaktor ausfindig gemacht, geht es 
ans Bombardieren, und zwar vom 
Flugdrachen aus, (Aha, daher der 
Name!) 

Sie suchen sich also einen Hang und 
starten für die gerechte Sache. Hier be¬ 
ginnt dss Spiel, sich von der Masse der 
vielen Action-Adventures abzuheben. 
Sie fahren einen Hang hinunter, ziehen 
den Joystick nach hinten und schon 
wechselt nahtlos die Musik, während 
Sie schwerelos in der Luft segeln. Die¬ 
ser Wechsel von der fast aggressiven 
Musik am Boden, zu der schwebend 
leichten in der Luft, trägt einiges zu der 
Atmosphäre dieses Spiels bei. Gleich¬ 


zeitig wird aus dem Adventure fast eine 
Simulation, wenn auch nur vereinfacht. 
Es kommt jetzt nämlich darauf an, den 
Drachen möglichst so an den Reaktor 
heranzubewegen, daß Sie vom Laser 
nicht gebraten werden. Ganz einfach ist 
das nicht, denn Sie müssen ja auch erst- 
einmal Höhe gewinnen, wobei man 
besser nicht in einen Sog hineinkommt 
oder in einen Hang reindüst. 

Sind Sie dann über dem Reaktor, müs¬ 
sen Sie nur noch richtig peilen und eine 
Granate abwerfen. Das Peilen ist aller¬ 
dings bei der 3D-Darstellung der Land¬ 
schaft nicht ganz einfach. Das Landen 
auf Bäumen beeinträchtigt die Lebens¬ 
energie beträchtlich, wohingegen man 
mit dem Fahrrad gegen selbige welche 
beliebig oft fahren kann. 

Das Landen, entweder durch Senken 
der Flughöhe oder durch Anfliegen ei¬ 
nes Hangs, ist kein Problem. Wirklich 
knifflig ist eigentlich nur das geschickte 
Anfliegen der Reaktoren. In der Anlei¬ 
tung steht, daß man die Laser ebenfalls 
zerstören könne, was mir bisher aller¬ 
dings noch nicht gelungen ist. Immer 
wenn ich einen getroffen habe, reagierte 
das Programm mit Zeichen auf dem 
Bildschirm, die allerdings wieder ver¬ 
schwanden. 

Bliebe eigentlich nur noch zu erwäh¬ 
nen, daß man auf der Insel noch zusätz¬ 
liche Granaten einsammeln kann, daß 
das Spiel allen Kartographen wärm- 
stens zu empfehlen ist, und es mir ge¬ 
rade durch den Wechsel der Fortbewe¬ 
gungsmittel und die gute Musik sehr 
angenehm aufgefallen ist. 

(Bernhard Bichmann/HS) 
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Avenger 

Hersteller: Gremlin 
Vertrieb: Fachhandel 
Steuerung: Joystick/Tastatur 
Monitor: Grün/Farbe 
Programm: 100% M-Code 
Preis: ca. 35,— DM 


SpiBllOC« 

Bedienjrgs- Doku- 

Gralik 

Sound 

Preisf 


freunalichkeil menlalion 



Leistung 



CPC 464 Kl CPC 6128 K 
CPC 664 K Joyce K 

Nachdem Sie in »Way of the Tiger« Ihre 
Prüfung als Ninja absolviert haben, 
warten Sie sicherlich schon ungeduldig 
auf den angekündigten nächsten Teil. 
»Avenger« ist diese Fortsetzung — al¬ 
lerdings anders als erwartet: Der Weg 
des Tigers führt von der Kampfsimula¬ 
tion zum Action-Adventure. Ihr Stief¬ 
vater, der alte Mönch, wurde ermordet. 
Als Ninja brennen Sie natürlich darauf, 
ihn zu rächen und die Pergamentrollen, 
die den Gott Kwon verkörpern, wieder- 
zufinden, die Yämon an sich gerissen 
hat. Sie sehen keinen anderen Weg, 
Kwon wieder zu versöhnen und Ihren 
Stiefvater ewige Ruhe finden zu lassen. 
Dies ist der Weg des Tigers. 

Ihr Karma führt Sie zum Kerker der 
Dürstenden Herzen. Sie haben nur 
zehn Shuriken (Wurfsterne), Ihren 
Mut, und die Gewißheit, daß Kwon, 
der Gott mit der Macht des heiligen 
Wortes, Ihnen beisteht. 

Wie oben schon erwähnt, handelt es 
sich bei Avenger um ein Action- 
Adventure. Es ist zwar unerwartet, aber 
ich finde es gar nicht so übel, bei einer 
Fortsetzung die Spielart zu wechseln, 
bloß sollte das auch klar ersichtlich 
sein. Ich dachte noch bis nach dem La¬ 
den, daß es sich wieder um eine 
Kampfsimulation handelt. 

Das Konzept, das dieser Serie zugrunde 
liegt, ist wirklich gut. Die Spiele basie¬ 
ren nämlich auf den Rollenspiel- 
Büchern desselben Namens (The Way 
of the Tiger). Ich muß zugeben, ich 
kenne diese Bücher nicht, nehme aber 
an, daß sich die Programmierer jeweils 
für einen Teil ein Spiel ausgedacht ha¬ 
ben. Das hat für den Käufer den Vor¬ 



teil, ein Ganzes zu haben — praktisch 
eine Welt, in der er immer neues Erle¬ 
ben kann und nicht nur ein paar einzel¬ 
ne Spiele. 

Ihre Aufgabe in Avenger ist es, den 
Mord an Ihrem Stiefvater zu rächen und 
Kwon aus der Gewalt von Dämonen zu 
befreien. Dazu müssen Sie erst einmal 
jede Menge Schlüssel für die verschlos¬ 
senen Türen innerhalb des Kerkers fin¬ 
den und die drei Wächter in einer ganz 
bestimmten Weise und festgelegten Rei¬ 
henfolge ins Jenseits befördern. Dann 
gilt es, die Pergamentrollen zu finden 
und sie heil aus dem Kerker zu bringen. 
Vorher muß allerdings noch der Mord 
gerächt werden. 

Auf dem Bildschirm sieht das folgen¬ 
dermaßen aus: In der Mitte des Screens 
befindet sich das Hauptfenster, in dem 
der Kerker, oder vielmehr dessen Mau¬ 
ern, als Draufsicht gezeigt wird. Das 
Spielfeld wird größtenteils gescrollt. 
Links neben dem Hauptfenster stehen 
die Anzeigen für innere Kraft und Aus¬ 
dauer in schon gewohnter Form, rechts 
davon sind die drei Wächter abgebildet. 
Im unteren Teil des Bildschirms, fast 
noch im Hauptfenster, ist für die Mit¬ 
teilungen Kwons eine Zeile Platz gelas¬ 
sen; die dann als Scrolling-Messages 
ausgegeben werden. Darunter sind die 
Fenster für die Anzahl der gesammel¬ 
ten Schätze und der der Shuriken und 
die Anzeigen für gefundene Gegenstän¬ 
de und die Anzahl der zur Verfügung 
stehenden Schlüssel. 

Vom Aufbau her erinnert »Avenger« 
sehr an Druid, mit dem einen Unter¬ 
schied, daß die Gegner nur begrenzt 
und nicht in rauhen Mengen auftau¬ 
chen. Dadurch verlagert sich das Ge¬ 


wicht von Action mehr auf Adventure. 
Wie bei Druid gibt es auch hier einige 
Arten von Gegnern, bloß sind hier die 
Feinde immer am selben Ort bzw. im 
selben Raum. 

Im Labyrinth des Kerkers, das aus ca. 
300 Räumen auf sechs Ebenen besteht, 
findet man einige sehr nützliche Gegen¬ 
stände, wie z.B. Zauberformeln, 
Brecheisen, Behältnisse, Eisenfauste 
und auch ein magisches Schwert. Geg¬ 
ner werden entweder mit Shuriken, ei¬ 
nem Fußtritt oder einer gefundenen 
Waffe beseitigt. Bei Berührung eines 
Feindes werden Ihnen Energiepunkte 
abgezogen! 

Wenn Sie Energie brauchen, haben Sie 
die Möglichkeit, Kwon nach neuer 
Kraft anzuflehen. Dies geht so oft, bis 
Kwon verärgert ist und meint, daß Sie 
ein Versager sind, was hoffentlich nicht 
Vorkommen wird. 

Die Grafik von Avenger ist gut, wird al¬ 
lerdings noch vom Sound übertroffen. 
Die Titelmusik hat mir rein vom Tech¬ 
nischen als auch von der Atmosphäre 
her gut gefallen. 

Noch eines möchte ich erwähnt haben, 
die Titelgrafik von Steve Kerry. Er hat 
ja schon einige Ladebilder für Gremlin 
gemacht, aber das von Avenger gefällt 
mir persönlich besonders gut. Das Bild 
besteht aus drei Elementen, einem Nin¬ 
ja, einem Tigerkopf und einer Land¬ 
schaft, die fast unerkennbar in einander 
übergehen. 

Avenger hat mir insgesamt einen sehr 
guten Eindruck gemacht und wird si¬ 
cherlich ein Adventure sein, was nicht 
im Schrank versauert. Ich freue mich 
schon jetzt auf Teil 3 und bin gespannt, 
wie der aussehen wird. 

(Bernhard Bichman/HS) 
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Warnung! Wenn Sie in der Galaxis unterwegs sind und dabei auf 
Flottenkommandeur Hermann Kruud stoßen, sollten Sie schleu¬ 
nigst den Rückwärtsgang einlegen und abhauen. Denn Kruud ist 
nicht nur der widerwärtigste Träger eines roten Vollbarts, den die 
Galaxis je gesehen hat, sondern auch der gefährlichste Chaot. Wo 
Kruud zuschlägt, wächst 2 Milliarden Jahre lang nichts mehr! Das 


Flugsimulationsspiel Starglider gibt es für den C 64, Schneider, 
Atari ST und Amiga. Und den neuen Katalog gibt es bei uns. 

Name_ 

Straße_ 

PLZ_Orl_ 

An: ariolasolt, Carl-Bertelsmann-Str 161,4830 Gütersloh 
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[—Abenteuer 



Viele, viele Tips zu den unterschied¬ 
lichsten Spielen landeten in den letz¬ 
ten Wochen auf meinem Schreib¬ 
tisch. Aus all diesen wirklich guten 
und interessanten Hinweisen galt es 
es nun, das Beste herauszusuchen. 
Und das war, so kann ich Ihnen ver¬ 
sichern, keine leichte Aufgabe. Aber 
genug mit all diesen Ausführungen, 
die den sowieso schon spärlich be¬ 
messenen Platz wegnehmen. Also, los 
gehts... 


Souls of Darkon 

Im ersten Bild kann man die Skulptur 
öffnen, indem man das Metallteil her¬ 
ausbricht. — Wenn man die Verzierung 
auf dem Altar drückt und das Wappen 
auf dem Stein dreht, fallen eine Axt und 
ein Schwert aus dem Bild. — Wenn 
man die Axt dem Holzfäller gibt, 
schenkt er einem dafür einen Anti- 
Schwerkraft-Gürtel, etwas Salz, ein 
Salz und ein paar Kräuter. — Den Ha¬ 
ken aus der Skulptur kann man an das 
Seil binden. — In die Hütte beim Holz¬ 
fäller und in die Schmiede kommt man, 
indem man die Tür öffnet und das Ge¬ 
bäude betritt. — Wenn man das 
Schwert dabei hat, beim Schmied steht 
und ihm die Goldmünze gibt, repariert 
er einem das Schwert. Es liegt im Faß 
vor der Schmiede. — Wenn man auf die 
Schnalle am Gürtel drückt, hebt man 
ein Stückchen vom Boden ab. — Wenn 
man den Führer nach dem Weg fragt, 
sagt er einem, daß, wenn man ihm Gold 
gibt, er einem den Weg zeigt. Wenn 
man ihm aber die Goldmünze gibt, 


nimmt er sie dankend an und macht kei¬ 
nen Finger krumm. 


Warlord 


Den Hasen befreien, dann verwandelt 
er sich in den Gott Lug. — Die Körner 
dem Raben geben, dann verwandelt er 
sich in die Göttin Danu und schenkt ei¬ 
nem ein Halsband. — Das Salz nicht 
mit in den See nehmen, da es sich sonst 
auflöst. — In der Höhle des Lug aus 
dem Wasser klettern. — Wenn der 
Krieger den Helm sieht, läßt er einen 
durch. — Der Wache an der Hügelfe- 
stung muß man das Salz geben, dann 
läßt er einen ein. — Beim Händler kann 
man sich mit dem Eisen Fleisch kaufen. 

— Wenn man am See schläft, erscheint 
ein Schwert. — Den wilden Ochsen 
muß man mit dem Schwert töten, und 
dann kann man ihn befreien und sich 
das Seil nehmen. — Um den Bären tö¬ 
ten zu können, braucht man das 
Schwert und das Schild. — Dem Mäd¬ 
chen in der Hütte darf man nicht trau¬ 
en! Es führt einen ins Verderben. — 
Um durch den Sumpf zu kommen, muß 
man das Halsband tragen, und in die 
Richtungen, in denen einem warm 
wird, darf man nicht gehen. — Den 
Wölfen muß man das Fleisch zuwerfen. 

— Durch die Feuer wand kommt man, 
wenn man den weißen Mantel trägt. — 
In der Wüstenfestung muß man im obe¬ 
ren Wachzimmer auf das Stroh sprin¬ 
gen. Um von unten wieder hochzukom¬ 
men, muß man die Leiter nehmen und 
gegen die Plattform lehnen. — Wenn 
man in der Gegend von Bridon den 


Zauberstab dabei hat, erscheint ein Rö¬ 
mer, der einen angreift. Jetzt muß man 
das Essen essen und ihn mit dem 
Schwert angreifen. Das Resultat: Der 
Römer flüchtet! Jetzt muß man noch 
eine Weile in der Gegend herumlaufen, 
dann sieht man einen Römer, der sein 
Lager aufschlägt. Diesen Römer muß 
man mit dem Seil fangen und ihn dem 
Druiden bringen. Der gibt einem dar¬ 
aufhin ein Amulett. — Um an den Dä¬ 
monen im Tal des Flüsterns vorbeizu¬ 
kommen, muß man das Amulett anzie- 
hen. — Den Monolithen kann man be¬ 
treten. — Die Urne des Nemed kann 
man nur nehmen, wenn man den Helm 
trägt. — In der Kristallhöhle muß man 
in den Ring treten. — In der Zauberwelt 
kann man die Fomorians nur umbrin¬ 
gen, wenn man das geheiligte Schwert 
besitzt. — In der Höhle der Danu muß 
man das Schwert auf den Stein legen, 
dann bekommt es einen bläulichen 
Schein und wurde geheiligt. 


Return to Eden 


Aus dem Walk-in-Cupboard braucht 
man: Radsuit (anziehen), Geiger Coun¬ 
ter und Compaß — Bei Maulwurfshü¬ 
gel muß man graben, und in den Gang 
steigen. — In der komfortablen Höhle 
muß man schlafen. — Auf der losen 
Erde muß man graben. — Die süße Er¬ 
bse muß man hinlegen, wenn der 
Ouija-Vogel erscheint. Er legt dann ein 
Ei, das man pflanzen sollte. — Im Haus 
findet man einen Fisch für den Wal¬ 
fisch. — Um in das Wasser zu kom¬ 
men, braucht man den Kanu-ähnlichen 
Baumstamm und das Schilfrohr. 
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Software-Schnell-Versand 


OAX kopiert die Progr«aae, die ait dem Kopierschutz 
"SPEEDLOCK" geschützt sind wahlweise auf Kassette oder 
Diskette. SPEEOLOCK ist ein Kopierschutz, den viele 
SoftwarehSuser bei Ihren Spielen verwenden. OAX liest diese 
>Programme und erzeugt ungeschützte Duplikate. ACHTUNG - 
OAX darf nur zur Erzeugung von persönlichen 
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CLONE ist ein neuartiges Dlsketten- 
koplerprognmm welches Sicherheits¬ 
kopien von geschützter Disketten¬ 
software herstellt. Welcher Kopier¬ 
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Abenteuer 
zweimal anders 

Erinnern Sie sich noch, wie vor 18 Mi¬ 
nuten eine aufgeregte Frau Sie in der 
Gendarmerie von St. Etienne anrief 
und Ihnen berichtete, daß eine ihrer 
Mieterinnen tot auf ihrem Zimmer 
liegt? Sie fuhren sofort an den Tatort 
und nahmen den Tatbestand auf. Es sah 
alles wie Selbstmord aus. Nur etwas 
störte Sie, es war zu selbstverständlich. 
Und dann noch dieser Abschiedsbrief. 
Der Fall ließ Sie nicht in Ruhe, und so 
begannen Sie auf eigene Faust zu ermit¬ 
teln. Und später wußten Sie, warum 
Vera Cruz sterben mußte, denn es war 
viel Geld im Spiel. 

Mit »Vera Cruz« präsentiert die franzö¬ 
sische Softwarefirma »INFOGRA¬ 
MES« ein Krimi-Adventure ganz neu¬ 
er Art. Hier wird der 38'er Trommel¬ 
revolver und die Flasche Bourbon ge¬ 
gen Keyboard und Bildschirm 
ausgetauscht. Dem erfreulichen Trend, 
Abenteuer einzudeutschen, wurde auch 
hier nachgegeben. Artete das bei ande¬ 
ren Spielen höchstens zu Lacherfolgen 
aus, so wurde es hier recht ordentlich 
gemacht. Ein paar Fehler sind schon 
drin, aber so kleinlich sind wir ja nicht. 
Das Spiel ist in zwei Teile gegliedert. 
Im ersten Teil befindet man sich in der 
Wohnung von Vera Cruz und man muß 
Hinweise auf ihren Mörder finden. Im 
Endeffekt sieht das so aus, daß man ei¬ 
nen Cursor in Vera’s Wohnung steuert. 
Auf Feuerknopfdruck hin vergrößert 
der Computer den Teil des Bildes, den 
der Cursor umschließt. Hier findet man 


unter anderem ein Adressbuch, die ver¬ 
meintliche Tatwaffe, einen Abschieds¬ 
brief und einiges mehr. Wenn man 
meint, man habe alles wichtige gefun¬ 
den, so kann man auf Druck einer Ta¬ 
ste den zweiten Teil laden. 

Im zweiten Teil sitzt man vor dem Da¬ 
tenterminal der Gendarmerie und kann 
seine Nachforschungen vertiefen. Die¬ 
ser Teil des Spieles präsentiert sich als 
ziemlich schwieriges Grafikadventure. 
Man kann unter anderem den Grapho¬ 
logen beauftragen, den Abschiedsbrief 
zu untersuchen, worauf einem dieser 
mitteilt, daß Vera diesen Brief gar nicht 
geschrieben hat. Die geschulten Mar¬ 
lowes und Megrais (meinst Du viel¬ 
leicht Maigretü!) kombinieren natür¬ 
lich: Wenn Vera nicht den Brief ge¬ 
schrieben hat, wer dann? Und im allge¬ 
meinen ist es doch so, daß man 
wenigstens diesen Brief selber schreibt. 
Verabschieden lassen ist irgendwie un¬ 
gewöhnlich. Das ist nur ein kleiner 
Teil, der nicht zu der bequemen und 
einfachen Selbstmordgeschichte paßt. 
»Vera Cruz« ist ein sehr spannendes 
Spiel, und immer, wenn ich die 
Packung ansehe, muß ich es mir ver¬ 
kneifen, die Diskette in das Laufwerk 
zu legen und »Vera Cruz« zu spielen. 
»Vera Cruz« ist eines der wenigen 
Adventure-like-Spiele, die ich auch je¬ 
mandem ohne Englischkentnisse emp¬ 
fehlen kann. 


Die Erbschaft 

»Das Gürteltier schlägt zurück!« so 
könnte man das neue Programm von 


»INFOGRAMS« nennen. Denn »Die 
Erbschaft« führt die Tradition von Vera 
Cruz weiter. Gute Grafik und abwechs¬ 
lungsreicher Spielablauf machen das 
Spiel noch interessanter als es ohnehin 
schon ist. Es ist wieder eingedeutscht 
worden, und ich finde es wirklich toll, 
wie sich die Franzosen Mühe geben. 
Die Story steht dem in nichts nach: Sie 
liegen auf Ihrem oxydierten Alumini- 
um-Bettgestell (eigentlich mehr Gestell 
als Bett) in einem schmutzigen Miets¬ 
haus in Upper Connecticut, USA und 
denken darüber nach, wie Sie wohl je¬ 
mals aus diesem Zimmer im 17. Stock 
kommen sollen. Draußen laiern Ihre 
Gläubiger und die Nachbarn, von de¬ 
nen Sie sich Dinge entliehen haben. 
Doch plötzlich hören Sie ein Klopfen 
an der Tür. Sie öffnen und wollen sich 
dem Schicksal (sprich: dem Gläubiger) 
ergeben, als sie merken, daß es der 
Hausmeister ist. »Hier ist eine Tele¬ 
gramm, Mister Stone!« sagt der Mann. 
Sie nehmen den (natürlich bereits ge¬ 
öffneten) Brief und lesen ihn. Erstaunt 
stellen Sie fest, daß 200,- DM beige¬ 
legt sind. 

Der Text des Telegramms besagt, daß 
eine ihrer Tanten gestorben ist. Sie hat 
verfügt, daß Sie als Ihr Neffe, den Coup 
nachmachen soll, der ihr in den dreißi¬ 
ger Jahren gelungen ist:In einer Nacht 
in Las Vegas 1.000.000,- DM gewin¬ 
nen. Jetzt sieht die Lage natürlich ganz 
anders aus, denn mit den 200,— DM 
können Sie bestimmt einige Gläubiger 
bezahlen. So packen Sie munter Ihre 
Reisetasche und ziehen hinaus in die 
feindliche Welt. 

(Jan Hennig/HS) 


■ 
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Inzwischen sind die ersten Reaktio¬ 
nen auf unsere neue Rubrik einge¬ 
troffen; ein durchweg positives Echo 
ermutigt uns den Bereich des Profes¬ 
sional Computing weiter auszubau¬ 
en und zu pflegen. Für die Joyce- 
User sind zwei Leckereien in Vorbe¬ 
reitung: Zum einen eine Abteilung 
»Nutzware«, die den Bereich der An¬ 
wendersoftware intensiver betreuen 
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wird; zum anderen eine Serie, die die 
Hardware der PCW’s ausführlich 
beschreibt; Bauanleitungen für aller¬ 
lei Erweiterungen werden diese Ar¬ 
tikelserie abrunden. 


PC 1512 

PC und Grafik sind gar nicht so schwer zu vereinbaren. 
Zwar geht es nicht ganz so einfach wie auf nebenstehen¬ 
dem Bild gezeigt, aber mit der richtigen Software soll¬ 
te es überhaupt kein Problem sein. 

Welches allerdings die richtige Software ist, hängt ganz 
davon ab. für welches Einsatzgebiet sie verwendet wer¬ 
den soll. 

Über eins ist man sich bei Schneider und Amstrad im 
klaren: GEM-orientiert muß sie sein. 

Aber ist GEM wirklich der Weisheit letzter Schluß? 
Was bietet sich als Alternative? Etwa MS-Windows, von 
denen in letzter Zeit alles spricht? Den PC 1512 Besit¬ 
zer braucht das nicht zu interessieren; vorrangig ist auf 
jeden Fall erst einmal GEM. Was über GEM hinaus noch 
möglich ist. erfahren Sie in einer der nächsten Ausga¬ 
ben. Schwerpunkt diesmal ist die Grafiksoftware unter 
GEM. die nun zu LOW-Level-Preisen speziell für PC 
1512 Besitzer angeboten wird. 

Zwei dieser Programme haben wir einer genaueren Un¬ 
tersuchung unterzogen. 

Wie man mit dem etwas schwachbrüstigem Speicher des 
PC 1512 zurechtkommt, ohne sich dabei in Unkosten zu 
stürzen, erfahren Sie in der Aufrüstungsanleitung, un¬ 
seres Lesers H. Kleiner. 

Nicht ganz so hoch greifen andere Mitarbeiter, die Ein¬ 
stiegshilten in das Basic 2 und MS DOS allgemein bieten. 
Sehr interessant dürfte auch für viele Anwender die Vor¬ 
stellung der Vortcx-Harddisk sein, mit deren Verwen¬ 
dung eine Menge Geld gegenüber der Standard- 
Festplattenversion des PC 1512 gespart werden kann. 
Viel Information für Anwender. Bastler und Program¬ 
mierer in dieser Ausgabe von PC International. 

»Die MS-DOS-Geweihten grüßen Euch??« (TM) 


PCW 8256/8512 

Eine kurze Vorbemerkung: Nachdem ich nun nach drei 
Monaten mit diesen Maschinen beschäftigt bin und auch 
einige Kontakte zu Joyce-Usern geknüpft habe, kann ich 
nicht umhin, diesen Rechnern und insbesondere ihren 
Besitzern einige Anerkennung zu zollen. Die Qualität der 
Informationen, die ich von Ihnen, liebe JOYCEr. erhalte, 
ist meiner Arbeit und damit auch dieser Rubrik sehr zu¬ 
träglich. 

Inzwischen kann ich mich über einen Mangel an qualifizierten Beiträ¬ 
gen für die Joyce-Rechner wirklich nicht mehr beklagen. Meine Qual 
(der Auswahl) kommt Ihnen auch in diesem Heft zugute; der Schwer¬ 
punkt liegt bei einem Programmpaket, welches die Erstellung und Pfle¬ 
ge einer Lager- und einer Kundenkartei ermöglicht. Professional Com¬ 
puting bietet in diesem Heft u.a. für die PCW's: 

— LAKA und KUKA- die erwähnten elektronischen Karteikästen mit 
vielen Möglichkeiten. Sie müssen nur Ihren eigenen Firmennamen 
im Programm einsetzen - fertig. 

— Der dritte und letzte Teil unserer Grafik-Serie rundet die Informa¬ 
tionen zum GSX-Treiber ab. 

— Und jetzt der Clou (last not least); PC International prodly presents: 
den Joyce-Checksummer. Sämtliche Programmiersprachen, die ihre 
Programme im ASCII-Format zur Verfügung stellen können, kön¬ 
nen mit diesem Werkzeug auf Fehler in den Listings überprüft wer¬ 
den. Von dieser Ausgabe an werden alle Joyce-Listings mit der Prüf¬ 
summe dieses Checksummers ausgestattet sein. 

(ME) 








Ein Rechner ist so gut wie seine Soft¬ 
ware. Dies ist nicht nur eine altbekannte 
Weisheit für Computeranwender, die 
Aussage umschreibt zur Zeit leider 
auch noch die Nachteile des Joyce- 
Rechners. 

Mittlerweile hat sich jedoch einiges auf 
dem Gebiet der Softwareangebote für 
den PCW 8256 getan, und die Pro¬ 
grammköche haben recht interessante 
Softwaregerichte auf den Markt ge¬ 
worfen. 

Die Firma Star-Division ist seit kurzem 
mit einer neuen überarbeiteten Produkt¬ 
linie in diese »Softwarelücke« gestoßen 
und bietet seitdem Programme auf ei¬ 
nem relativ niedrigen Preisniveau an. 

Das Datenbanksystem »Star-Base« ge¬ 
hört zu diesen Programmen der Star- 
Division und verdient wegen seiner 
umfangreichen Anwenderfunktionen 
und seines verhältnismäßig günstigen 
Preises (198,- DM), beschrieben zu 
werden. 

Wenn Sie innerhalb kürzester Zeit ver¬ 
schiedene Dateien erstellen, bearbeiten 
und ausdrucken, ja sogar mit einem 
selbsterstellten persönlichen Menue auf 
diese zugreifen wollen, ohne vorher 
eine eigene Programmsprache lernen 
zu müssen, dann bietet sich »Star-Base« 
als eine sinnvolle Alternative zu den 
bisherigen Datenbanksystemen an — 


allerdings mit einigen Mängeln. 

Die erste Überraschung trifft den An¬ 
wender schon beim Versuch, eine Si¬ 
cherheitskopie anzufertigen. Das Er¬ 
stellen einer Sicherheitskopie ist zwar 
möglich, laufen kann das Programm 
aufgrund seines Kopierschutzes aller¬ 
dings nur auf der Originaldiskette! Sollte 
diese mal defekt werden, bietet die Star- 
Division zwar eine Ersatzdiskette an; 
diese kostet den Besitzer des Pro¬ 
gramms allerdings zusätzliche 20, - DM. 
Um den Alptraum zu vermeiden, plötz¬ 
lich mit defekter Diskette dazustehen 
und auf die dringend benötigte Adress- 
datei nicht zugreifen zu können, weil 
die Ersatzdiskette erst noch bestellt 
werden muß, sollte der Anwender (be¬ 
vor er sich also zum Kauf des Pro¬ 
gramms entscheidet) zusätzliche 20, — 
DM für eine Sicherheitsdiskette einkal¬ 
kulieren. 

Bei »Star-Base« gibt es gegenüber an¬ 
deren Datenbankprogrammen aller¬ 
dings einen entscheidenden Vorteil: 
»Star-Base« ist sofort anwendbar. Der 
Anwender ist nicht wie bei anderen Da¬ 
tenbankprogrammen auf die Beherr¬ 
schung einer Programmsprache ange¬ 
wiesen, sondern kann sofort mit der 
»Star-Base« arbeiten. 

Nach dem Laden erscheint ein Haupt- 
menue, über das die Funktionen von 


»Star-Base« aufgerufen werden können. 
Von hier aus kann der Anwender bei¬ 
spielsweise über ein Untermenue 
»Stammdatenverwaltung« auf eine 
schon fertig angelegte Kundendatei zu¬ 
greifen. 

Erkennbar ist die Ausrichtung des Pro¬ 
gramms auf kleine mittelständische 
Unternehmer. Aber »Star-Base« kann 
prinzipiell für jede Anwendung benutzt 
werden, sei es für die Abspeicherung 
von Buchtiteln, zum Vokabeln lernen, 
oder einfach nur als Adressdatei. 
Über einen Maskengenerator können 
Eingabemasken für diverse Dateien er¬ 
stellt werden. Solche Masken dienen 
dazu, die eingegebenen Daten aufzu¬ 
nehmen. Die Eingabemaske kann max. 
neun Bildschirmseiten und bis zu 100 
Datenfelder pro Datensatz umfassen. 
Aber hier begegnet dem unerfahrenen 
Anwender ein verflixtes Problem: 
Beim Anlegen einer neuen Eingabe¬ 
maske erscheint plötzlich die Fehler¬ 
meldung »Zeigerdatei nicht gefunden« 
Durch Drücken der Taste »i« muß der 
»Fehler« ignoriert und das Programm 
ordnungsgemäß (!) weitergeführt wer¬ 
den. Mich hat es Stunden gekostet, 
über diese Klippe hinwegzukommen, 
da der beigelegten Bedienungsanwei¬ 
sung kein Hinweis auf diese »ordnungs¬ 
gemäß« auftretende Fehlermeldung zu 
entnehmen war. 
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Dies führt zu einem weiteren »Star- 
Base«-Problem: Die beigelegte Bedie¬ 
nungsanweisung von »Star-Base« ist 
trotz ihrer rund 150 Seiten ziemlich 
knapp gehalten. Meines Erachtens ist 
dies ein nicht geringer Mangel des Pro¬ 
gramms. Denn wie sagt der erfahrene 
Computerfuchs: »Ein Programm ist 
nicht besser als seine Dokumentation«. 

Wenn der Anwender sich seine indivi¬ 
duellen Dateien mit Hilfe der Eingabe¬ 
maske zusammengebastelt hat, kann er 
nun über einen sogenannten »Menuege- 
nerator« ein eigenes Anwendermenue 
zusammenstellen. So läßt sich jede Da¬ 
tei durch einfach zu bedienende »Pull- 
Down Menues« aufrufen. Wenn man 
sich auskennt, braucht man für die Er¬ 
stellung eines persönlichen Menues 
etwa fünf bis zehn Minuten. 

Innerhalb einer Datei kann zwischen 
acht Zugriffsschlüsseln gewählt wer¬ 
den, die es ermöglichen, beispielsweise 
eine Buchtitelkartei nach Autor, Titel, 
Stichwort usw. zu sortieren. 

Mit Hilfe von Selektionsanweisungen 


ist es darüber hinaus sogar möglich, in 
einer Datei gezielt Datensätze zu selek¬ 
tieren. Hinsichtlich des obigen Bei¬ 
spiels könnte man z.B. alle Buchtitel 
mit dem Stichwort »Computerlitera¬ 
tur«, die nach 1980 erschienen sind, 
ausfindig machen. Ebenso können Re¬ 
chenoperationen, Datei verweise und 
Unterdateiaufrufe durchgeführt wer¬ 
den. 

Für den Anlanger ist meines Erachtens 
das Erstellen von Druckmasken die 
schwierigste Angelegenheit. Diese 
Druckmasken dienen dazu, Dateien 
bzw. Datensätze auszudrucken. 
Anfangs hilft der Anwender sich am 
besten dadurch, daß er im Menuepunkt 
»Ausgabemaske erstellen« den Punkt 
»Fomulartext« auf »JA« stellt und über 
die Taste »f3« das »Formulartext»- 
Editierfeld erreicht. Nun können die 
Ausgabefelder mit Hilfe des Cursors 
nach dem Prinzip der Eingabemaske¬ 
nerstellung positioniert und definiert 
werden. 

Eine komfortable Möglichkeit, die 
»Star-Base« bietet, ist das Ausdrucken 


von Serienbriefen. Ebenso können For¬ 
mulare erstellt und ausgedruckt wer¬ 
den. Weiterhin sind verschiedene 
Schriftarten möglich. 

Die Druckausgabe von Dateien selbst 
ist ziemlich einfach und erfolgt wäh¬ 
rend der Dateibearbeitung. Umständ¬ 
lich wird es jedoch, wenn man bei¬ 
spielsweise die voreingestellte Schrift¬ 
art ändern will, denn dazu ist der An¬ 
wender gezwungen, die Dateibearbei¬ 
tung abzubrechen, um den Druckmas¬ 
kengenerator aufzurufen. 

Insgesamt, meine ich, ist »Star-Ba.se« 
ein für seinen Preis relativ komfortables 
und vielseitiges Programm, das vor al¬ 
lem schnell erlern- und anwendbar ist, 
jedoch benötigt der unerfahrene »Da¬ 
tenbanker« einige Zeit, bis er vor allem 
die Klippen der zu knappen Dokumen¬ 
tation umschifft hat und in ruhiges Da¬ 
tenbankwasser geraten ist. 

(P.Diesler) 

Anm. d. Redaktion: Star Division bie¬ 
tet ein Übungshandbuch zur Star-Base 
zum Preis von DM 10,— an, welches 
einige Ungereimtheiten beseitigen soll. 


ESCHCOMP - 

COMPUTER-VE RTRIEB 

UNSERE TOP-TEN Programme 


SYSTEM 

EDV-Beratung 
Hardware + Software 

Sonder-Preise für 
Schneider PC 1512 


1. Lehrer-Schulverwaltung 

lür CPC 464/664/6126 398, - DM 

(Version für JOYCE u MS-DOS in Voroereitung) 

2. Einnahme-Ubersc huß-Rechnung 

lür CPC 464/664/6128/VOrtex 288. - DM 

lür Joyce / MS DOS 398,- DM 


TANDON 20 MB ml Controller DM 1199 — 
einbaufertig vo'toimatiuii IX vvali Slromauln 

RAM Erweiterung auf 640 KB 

DM 

69 - 

NEC V CHI P. V 30 8 MH/ 

DM 

49 

INTEL Arjlh Co Prozess 6087 

DM 

593 


DM 

599 - 

Hercules Karle mil TTL Mon 14” 

DM 

799 - 


3. Appartement/Hotel-Abrechnung 

lür Joyce / MS DOS 1298,- DM 

4. Hausverwaltung/Mieter 

fr CPC 464/664/6128 248, - DM 

5. Super-Lotto RUN 49 

lür CPC 464/664/6128/Vortex 99, - DM 

lür Joyce /MS DOS 99, - DM 

6. Lohn/Gehalt Abrechnung 

für CPC 464/664/6128 5 99, - DM 

7. Star-Wrlter III v. Star-Division 

für CPC 464/664/6128 1 98,- DM 

8. BTX-Software-Decoder 

MS DOS Version Mono ab 398, - DM 

9. Pauker-Lernprogramm 

für CPC 464/664/6129 59, - DM 

10. Mathematik-Heiner 

für CPC 464/664/6128 59, - DM 


Supor-Prcl« lür Star-Drucker 

alle Preise aul Anfrage 
NL 10, NG 10, NX 15 NB 15 
SD in SD 15, SH in SR 15 


Super-Preise für MCI Personal-Computer 

MCI XT 16 PC XT kompatibel, WO KB oB 
2x360 KB Floppy Owe, seriell u Parall Perl 
akkugepullerle Uhr. 14” Graphik Monitor 
Monochrom Graphik Karle (720x348 F*) 

kompl.-Prais DM 2499.- 

kompl -Preis 

mit 20 MB Feslpl DM 3B9fl : - 


Star Division-Sollware 


Version Joycs r Jovce Plus 

Business Slar DM 269 - 

Slaiislik Slar CM 69 - 

Mailing-Syslem CM 1/9 - 

Star-Base 0M 169 - 

Fibri Slar CM 289 

BTX - lur Ihren Schneidci PC 
lelzl lur alle SUPERGUMSTIG mil Ihrem Telelon 
ube' Akustikkoppler nur BIX Antrag ausliillen 
und Kenn Nr arilorO »ein Postmonem erforder 
lieh 


(Bitte INFO’s anfordern) 



Bildschirmtext 


BTX-SoHware-Decoder 

Veision ehre Graphik (Mono) 

DM 

398 

Version mil Graphik: 

DM 

798 

BIX Kabel (seriell) CM 

Dalaphon 521 23d 1200/75 0auü 0M 

49 

398, 

Komprellpakei Mona 

CM 

799 

Komplellpakel Graohik 

CM 

1199 


/hvljqIiCi v*. •tuntjhoslcr aucn fui andere komoaiibir PI 

Ifnlfl ibilii i' 1 il riniorücirl 



ESCHCOMP 

ERNST 

SCHEITHAUER 

Tel. 

SYSTEM 

8391 

PERLESREUT 

(085 55) 1390 


Universeller EPROM-Programmer 4003 

für Schneider CPC 464 / 664 / 6128 

■ Programmiert alte gängigen EPROM- und EEPROM-Typen 
( z B : 2716, 27C16, 2732, 2732A, 27C32, 2758, 2764, 
2764A, 27C64, 27128, 27128A, 27C12B, 27256, 27C256, 
2508, 2532, 2564, X2804A, X2816A, X2864A ) ■ Voll 

manügesteuerle Soltware aut Kassette oder Diskette 
* 32 KByte frei für EPROM-Delen ( Brennen des 27256 
ohne Nachlede« ) ■ Kein Umschslten Stacken oder Löten 
nötig ■ Progremmierspinnung wird im Gerät erzeugt ■ Ver¬ 
bindung zum CPC über Flechbendkebel und Interfece-Kerte mit 
durchgeführtem Eapensionsport ■ Rote und grüne leuchldiode zur 
Betriebs-Art-Anzeige ■ Komplett mil 28 poligem Textool-Sockel ■ 

■ ferliggerit für CPC 464/664 DM 289,50 ■ Bausatz für CPC 464/664 DM 239,- ■ 

■ Fert/ggeret für CPC 6128 DM 319,50 ■ Bausatz für CPC 6128 DM 269,- ■ 

■ Aufpreis für Software auf 3' Diskette : DM 15,- / auf 5.25* Diskette : DM 5,- ■ 

EPROM-Karte 2-64 KByte für alle CPC 

■ Wahlweise bestückbar mil 2-64 KByte EPROM-Kapszi- 
tet ■ Arbeitet mit den EPROM-Typen 2716,-32,-64,-128 

■ Durchgeführter Erweilerungsbus ( Floppy kompatibel ) 

■ Autostert von BASIC- und/oder Assembler-Program¬ 
men ■ Komplett mit umfangreicher und komfortabler 
Sollwert euf Kesselte oder Diskette ■ Gleichermaßen 
für Profis und Einstaiger geeignet ■ 

■ Ferliggerit für 464/664 DM 229,50 • Fertiggerit für 
6120 DM 249,50 ■ Bausatz mit Anleitung für 464/664 
DM 199,50 ■ Bausolz mit Anleitung Für 6128 DM 219,50 

■ Aufpreis für Soflwere euf 3‘ Diskette : DM 15,- / auf 5 25" Diskette : DM 5,- ■ 

■ Ferliggerit ohne Soflwere für CPC 464/664 : DM 99,- / für CPC 6128 : DM 119,- ■ 

preisgünstige Matrix-Drucker 

SPEEDY 100-80 100 Zeichen pro Sekunde ■ FX80 kompatibel ■ Near Leiter Quality ■ 

■ Bis zu 142 Zeichen pro Zeile ■ Friktionswelze und Treklorentrieb * nur DM 739,- 

SPEEDY 130—80 130 Zeichen pro Sekunde ■ Bis zu 132 Zeichen pro Zeile ■ 9*9 Matrix 

■ IBM kompatibel ■ Ideal für PC 1512 ■ deutsches und englisches Handbuch ■ nur DM 839,- 

Citizen LSP-120D 120 Zeichen pro Sekunde ■ IBM und EPSON kompatibel ■ 9*9 Matrix 

■ 4K Puffer serienmäßig ■ Schriften : Pica, Elite, invers, proportional, kursiv, komprimiert, 
doppelt breit, doppelt hoch ... • Neer Letter Quality ■ 2 Jahr« Garantie ■ nur DM 525,- 

Druckerkabel dobberhei 

Für CPC 464/664 DM 35,- inOU/TRIE-ELEKTROniK 

lür CPC 6128 DM 39,- 

für PC 1512 _ DM 39,- _ Brehmsstreße 9, 6835 Brühl, Tel: (06202) 71417 
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DAIAMAI 


JOWCE 


Hersteller: Data Becker 
Vertrieb: Data Becker 
Rechner: JOYCE 
Programm: Pascal 
Preis: 298,- DM 


Bedlermt - 11 



DATAMAT JOYCE ist eine relativ un¬ 
gewöhnliche Datenbank, und dies 
gleich in mehrfacher Hinsicht. 
Zunächst ist das Programm eher als 
eine »Formularverwaltung« zu bezeich¬ 
nen. Die »Formulare«, gewissermaßen 
die Masken der einzelnen Dateien, be¬ 
stehen aus bis zu neun Bildschirmsei¬ 
ten, die feste Texte und variable Daten¬ 
felder in (fast) beliebigem Umfang ent¬ 
halten können. Aus den variablen Fel¬ 
dern des Formulars ergeben sich dann 
die entsprechenden Datensätze mit den 
Datenfeldern. Diese Einzelfelder wer¬ 
den nicht, wie beispielsweise bei dBa¬ 
se, mit Feldnamen angesprochen, son¬ 
dern können bei Bedarf direkt am Bild¬ 
schirm »angefahren« werden. 

Dies bringt uns gleich zum zweiten un¬ 
gewöhnlichen Punkt: der Bedienung. 
Sie erfolgt zum Großteil über die vier 
Funktions- und die »CAN«-Taste. Auf 


dem Bildschirm wird rechts angezeigt, 
welche Funktion gerade über welche 
Taste erreichbar ist. Diese gutgemein¬ 
te Benutzerführung krankt zwar an 
manchen Stellen an kleinen Unzuläng¬ 
lichkeiten (so bewegt sich z.B. der Aus¬ 
wahlcursor bei Druck auf die obere Ta¬ 
ste nach unten und umgekehrt, auch ist 
besonders in der Einarbeitungsphase 
»Tastenzählen« nicht auszuschließen), 
stellt jedoch zusammen mit der über¬ 
sichtlichen Bildschirmaufteilung eine 
durchaus gelungene Bedienungsober¬ 
fläche dar. (Allerdings wird auch hier 
der Nachteil aller komfortablen An¬ 
wenderoberflächen deutlich: Sie sind 
ungeheuer zeitintensiv! Was bei dBase 
blitzschnell mit »USE datei, APPEND« 
geschieht, muß bei DATAMAT JOYCE 
zunächst mit dem Durchwandern meh¬ 
rerer Menues erkämpft werden.) Also 
eine langsame, aber sehr komfortable 
Bedienung. 

Die umfangreichen Formatier-, Such- 
und Sortierparameter können ebenso 
auf diese bequeme Art und Weise aus¬ 
gewählt werden, wie auch die Program¬ 
mierung auf diese Weise erfolgt. 

Ja, Sie haben richtig gelesen, man kann 
dieses System auch programmieren! 
Zwar nicht so umfassend wie unter 
dBase, aber dafür wesentlich unkom¬ 
plizierter, da Menue-orientiert. 

Dabei sind sowohl Berechnungen in¬ 
nerhalb eines Formulars als auch die 
Verknüpfung unterschiedlicher Formu¬ 
lare untereinander möglich. Auf diese 
Weise können auch komplexere An¬ 
wendungen wie z.B. eine Lagerverwal¬ 
tung o.ä. programmiert werden, es 
wurde auch schon mit variablen Serien¬ 
briefen experimentiert. 

Allerdings sind diese Anwendungen 
nicht ohne Probleme »übertragbar«, 
d.h. anderen DATAMAT JOYCE-An- 
wendern zugänglich zu machen. Dies 
liegt in der etwas absonderlichen Dis¬ 
kettenstruktur begründet. 

Auf einer DATAMAT-Datendiskette 
befindet sich prinzipiell nur ein einzi¬ 
ges riesiges File, in dem alles, aber 
auch wirklich alles, untergebracht ist: 
Von den Formularen über die Datensät¬ 
ze, Indexdateien und Druckformaten 
bis hin zu den Programmen. 

Dies bringt zwar eine optimale Disket¬ 
tennutzung (die Datendisketten müssen 
übrigens mit einem gesonderten Pro¬ 


gramm vorbereitet werden), verhindert 
aber praktisch jedwede Isolierung ein¬ 
zelner Anwendungen. Wenn man also 
im Ernstfall eine einzelne Datei auf eine 
andere Diskette transferieren möchte, 
muß man zunächst eine ganze Disket¬ 
te kopieren und anschließend die nicht 
benötigten Anwendungen einzeln lö¬ 
schen. Entsprechend dieser »geschlos¬ 
senen Konzeption« ist auch keine 
Schnittstelle zu anderen Programmen 
vorgesehen. Und was einmal »drin« ist, 
kommt nur noch über Drucker oder 
Bildschirm wieder raus, und rein 
kommt es auch nur über die Tastatur. 
Derartiger »Isolationismus« sollte bei 
einer Datenbank dieser Preisklasse und 
für professionelle Anwendungen ei¬ 
gentlich nicht zu finden sein. 

Daher mein »Wunschzettel« für die 
nächste Version: 

Dringend zu installieren: eine Im¬ 
port/Export-Funktion. Weiterhin wün¬ 
schenswert: Anzeige der Feldlängen bei 
Eingaben; Anzeige, daß ein Formular 
auf mehrere Seiten verteilt ist und auf 
welcher Seite man sich befindet; Wahl 
des Datenlaufwerks vom Programm 
aus (!); eventuell noch eine leichte Mo¬ 
difikation der Tastaturbedienung (Aus¬ 
wahl optional über Cursortasten; für 
»Gewohnheitstiere«). 

Fazit: 

Sieht man von den oben gemachten 
Einschränkungen ab, so ist DATAMAT 
JOYCE ein vielseitiges und leistungsfä¬ 
higes Programm mit einem vollkom¬ 
men neuen Datenbank-Konzept und 
breiten Anwendungsmöglichkeiten. 
Sind die »Verbesserungsvorschläge« erst 
einmal realisiert (wobei mir das 
»Durchbrechen der Splendid Isolation« 
als vorrangig erscheint), so ist 
DATAMAT-JOYCE nicht nur ein kom¬ 
fortables »Universalsystem«, sondern 
dann (aber erst dann!) auch ein profes¬ 
sionell einsetzbares Programm. 

(Noch ein Vorschlag: Wie wär’s mit ei¬ 
ner kleinen Preissenkung???) 

(M. Anton) 


Nutzeffekt Hedienungs- Doku- Gralik Arbeite* Preis/ 

freundllcftkeil irentalon gescnwindig- Leistung 


' , 








T ■ 

~r 

: 



—* 






2 





















3 





















. 























& 






















0 























7 























a 






















9 






















10 







_ 

















68 PC 2’87 






























































Von Kennern und Könnern geschätzt. 

... ein ausgezeichneter Jahrgang 


Experten halten die 86er Ausgaben des 
führenden Schneider Magazins für einen ausge¬ 
zeichneten Jahrgang. 



Schneider International 


Sichern Sie sich diese 
Qualität durch ein 
Abonnement. 


Experten sagen voraus, daß die 87er 
Ausgaben noch besser und informativer 

werden. 


Vom Preisvorteil 
gegenüber dem 
Einzel bezug 
wollen wir 
gar nicht 
weiter 
reden. 


Schneider International 
im Abonnement: 


Bundesrepublik 

Deutschland 

12 Ausgaben 60,- DM 
6 Ausgaben 30,- DM 


Auslandspreise: 


Europa 

12 Ausgaben 90,- DM 
6 Ausgaben 45,- DM 


Außereuropäisches Ausland 

12 Ausgaben 120,- DM 
6 Ausgaben 60,- DM 


Die Versandkosten sowie Porto 
sind in diesen Preisen bereits 
enthalten. 
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Einzelblattpapierrührungen für den Joyce-Drucker 



Wer kennt nicht das Problem: beim 
Ausdruck von mühsam erstellten Do¬ 
kumenten oder Serienbriefen muß fol¬ 


gender Vorgang bis zum bitteren Ende 
unermüdlich durchgefuhrt werden: Bo¬ 
gen einziehen, bis zur Blattmitte vor¬ 
schieben, Andruck öffnen, Blatt zen¬ 
trieren, Andruck schließen, Blatt bis 
zum Beginn zurückdrehen — drucken. 

Mit den von der Firma ABD angebote¬ 
nen Papiereinführungen wird dieser 
Vorgang um einiges erleichtert. Diese 
einfach auf den Drucker aufsteckbaren, 
mechanisch sehr stabilen Arbeitshilfen 
erlauben mittels zweier verstellbarer 


Seitenführungen eine einfache »Fütte¬ 
rung« des Joyce-Druckers; zudem ist 
die Einhaltung des rechten Blattrandes 
auf einen stets gleichen Abstand ge¬ 
währleistet. Diese Papierführung wird 
ab Anfang Januar in den Farben gelb, 
orange, rot, grün, blau und schwarz 
zum Preis von ab ca. DM 29, - erhält¬ 
lich sein. 

Info: ABD GmbH 
7000 Stuttgart 80 

Vertrieb: Fachhandel □ 



Modifiziert wird das File »F.COM« (52 
KByte); es ist das Hauptprogramm, der 
Rest auf der Diskette ist »optischer Ko¬ 
pierschutz«. Holen Sie sich das File 
F.COM mit PIPoder SWEEP auf eine 
leere Diskette und dazu den Debugger. 
Starten Sie den Debugger mit »DDTZ 
F.COM«. 

Nach kurzer Zeit meldet sich DDTZ 
mit der höchsten Programmadresse, sie 
sollte »CF7F« sein. Damit wissen wir 
schon, daß unsere Erweiterung ab 
Adresse »CF80« beginnen kann. 
Schauen wir uns nun den ersten Befehl 
(Adresse 0100) an: er lautet praktischer¬ 
weise »CALL 01B0«. 

Mit »A 100«, »CALL CF80« und ».« 
(jeweils mit RETURN abschließen) än¬ 
dern wir diesen Sprung auf unsere ei¬ 
gene Erweiterung. 


cracker-NEWS 

für 

Bastler 


Etwas bedenklich ist der folgende Tip 
zwar schon (Copyright etc.), aber wenn 
die Softwarehersteller nicht in der Lage 
sind, solche Bugs von Anfang an aus¬ 
zuschließen, muß man sich eben selbst 
helfen. 

So schön die Joyce-Version des Spiels 
»Fairlight« auch ist, eine Macke hat sie 
doch: da nach dem Start offensichtlich 
sofort das BIOS überschrieben wird, 
schaltet sich der Floppy-Motor nicht 
mehr aus. Eine ärgerliche Sache, vor 
allem bei einem Longrunner wie »Fair¬ 
light«, bei dem die Floppy stundenlang 
weiterlaufen kann. 

Mit einem Debugger läßt sich der Feh¬ 
ler recht schnell beheben (Erfahrung 
vorausgesetzt). Das folgende Beispiel 


wurde mit DDTZ, einem Debugger mit 
Z80-Befehlssatz erstellt. (Prinzipiell 
kann man auch SID + SAVE oder ei¬ 
nen anderen Debugger einsetzen, dann 
müssen aber auch Bedienung und gege¬ 
benenfalls die Mnemonics angepaßt 
werden.) 


Diese Erweiterung muß nun zwei Auf¬ 
gaben erfüllen: einerseits muß sie den 
ersten Sprungbefehl wieder restaurie¬ 
ren (CF80 - CF84), zum anderen muß 
sie das Hauptprogramm nach einer 
Wartezeit (hier: Tastendruck) starten 
(CF87 - CF91). 


CF80 

LD L,B0 

CF82 

LD H,01 

CF84 

LD (0101),HL 

CF87 

LD C,0B 

CF89 

CALL 0005 

CF8C 

CP 01 

CF8E 

JP NZ,CF87 

CF91 

CF94 

JP 0100 


ursprüngl. Adresse nach HL 
laden und ab 0101 speichern. 
(’Selbstmodifikation’) 
BDOS-Funktion #11 (CON-Stat.) 
aufrufen 

wenn keine Taste gedrückt 
weiter abfragen, sonst 
Programmstart (kein RET;;;) 
(Assembler beenden) 


70 PC 2’87 


















Professional Computing—i 


Starten wir den Assembler mit »A 
CF80« und geben folgendes ein: (Nur 
Mnemonics, keine Adressen und Kom¬ 
mentare...) 

Jetzt brauchen wir nur noch die Modi¬ 
fikation mit »W 100 CF94« abzuspei¬ 
chern, und die Sache ist geritzt. Star¬ 
ten Sie die modifizierte Version wie ge¬ 
wohnt mit »F«. Warten Sie nach dem 
Laden, bis das Floppy nicht mehr läuft 
und drücken Sie irgendeine Taste. Das 
Spiel läuft dann wie gewohnt, nur eben 
ohne das leise Hintergrundsäuseln der 
Floppy. 

(PS: Vergessen Sie die Originaldiskette, 
»Fairlight« läuft auch ohne sie...) 

Diese Methode läßt sich im Bedarfsfall 
bei allen Programmen anwenden, die 
unter CP/M geladen werden und mit ei¬ 
nem »CALL« beginnen. Autoboot- 
Programme mit dieser Macke (z. B. To¬ 
mahawk) sind damit leider nicht zu ver¬ 
bessern... 

(Michael Anton) 

Classic invaders 

Hersteller: Supernova/Gemini 
Vertrieb: Fachhandel 
Rechner: Joyce 
Programm: M-Code 
Bedienung: Tastatur 
Preis: ca. 49,— DM 


Das mußte ja kommen... aber hätte es 
wirklich sein müssen??? 

Der Ur-Ur-Großvater aller Ballerspie¬ 
le, »Space Invaders«, ist jetzt auch für 
den Joyce erhältlich. Näheres zu Inhalt 
und Geschichte können Sie der Review 
»Classic Invaders« von (HS) im Heft 
9/86 entnehmen. Allerdings hat die 
Joyce-Version (außer dem Namen) ab¬ 
solut nichts mit der dort besprochenen 
Version gemeinsam. Weder was den 
Hersteller betrifft, noch (und das ist 
viel schlimmer) in qualitativer Hin¬ 
sicht... leider! 

Erste Enttäuschung: Die Grafik, die 
sich hier etwas bieder präsentiert. Mit 
den Grafikzaubereien von »Fairlight« 
oder »Batman« kann sie absolut nicht 
mithalten. 

Zweitens: Der Sound. Einen guten 
Klang kann man vom Joyce ja nicht er¬ 
warten. Daß sich aber das durchgehen¬ 
de, nervtötende Gepiepse nicht einmal 
abstellen läßt, wiegt doppelt schwer! 

Irgendwelche motivationsfördernde 
Abwechslungen habe ich in den ersten 
beiden Leveln (von ???) nicht finden 
können, zu einer tieferen Erforschung 
fehlte auch jedweder Anreiz. Es dürf¬ 
te aber auch kaum mit Überraschungen 
zu rechnen sein. 

Wenn man sich wenigstens in einer 
Highscore-Tabelle verewigen könnte — 
aber die wird ja auch nicht abgespei¬ 
chert. .. 

Der reinste Witz: Die Bedienung, die 


ist nämlich auf die englische Tastatur 
zugeschnitten, bei der »Z« und »X« ne¬ 
beneinander liegen. Auf der deutschen 
Tastatur wird diese Belegung eine Qual 
(mit sehr viel gutem Willen kann man 
es auch als »den besonderen Reiz« in¬ 
terpretieren...). 

Ein Änderung vom Spiel aus ist nicht 
möglich, hier hilft nur das Operieren 
mit SETKEYS, um »Y« mit »Z« zu be¬ 
legen oder gleich der direkte Eingriff in 
das Programm selbst. (Die Patchadres¬ 
sen für SID: 

06A0: 5A -* 59 ; 0D8F: 7A - 79.) 

Was mir an diesem Spiel noch am be¬ 
sten gefiel, war, daß man aus dem Pro¬ 
gramm ohne Ausschalten des Rechners 
wieder herauskommt. 

Fazit: 

Eine ausgelaugte Spielidee, wenig Witz 
und Motivation, zudem noch bedie¬ 
nungsunfreundlich und, gemessen an 
den Leistungen (die erwähnte CPC- 
Version von Bubble Bus kostet 15, — 
DM und ist um einiges besser, ein voll¬ 
kommen indiskutabler Preis. 



Wirklich nur zu »empfehlen« für lei¬ 
denschaftliche Sammler oder »Inva- 
ders«-Fanatiker... 

(M. Anton) 


DIE JOYCE-DATABOX 
SOFTWARE FÜR DEN SUPER RECHNER 


Jetzt gibt’s die Databox-Disk auch für den Joyce und außerdem als praktisches Databox-Abo. 


Alle Joyce-Programme aus dem Heft finden Sie »ready 
to run« auf unserer praktischen Databox Zusätzlich ent¬ 
hält die Joyce-Databox noch Bonus-Programme. 
Diesen Monat: Inhalt, druckt die Inhaltsverzeichnisse 
Ihrer sämtlichen Disketten alphabetisch sortiert aus! 
Einzelbezug: 

Einzelbezugspreis für DATABOX: 

Diskette 3" 24,- DM zzgl 3,- DM Porto/Verp. 

(im Ausland zzgl. 5,- DM Porto/Verpackung) 

Das Databox-Abo kostet: 

Als Diskette für 1/2 Jahr (6 Lieferungen): 


im Inland und West-Berlin.150,- DM 

Im europäischen Ausland .160,- DM 

im außereuropäischen Ausland.180,- DM 


Als Diskette für 1 Jahr (12 Lieferungen): 


Im Inland und West-Berlin.300,- DM 

Im europäischen Ausland...320,- DM 

Im außereuropäischen Ausland. 360,- DM 


In den vorgenannten Preisen sind die Versand- und Ver¬ 
packungskosten enthalten. 

Bitte benutzen Sie für Ihre Bestellung die Abo-Karte. 

Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungsscheck) 
oder als Nachnahme zuzüglich der Nachnahmegebühr. 

(In das Ausland ist Nachnahme nicht möglich). 


Bitte Bestellkarte benutzen! DMV Verlag — Fuldaer Str. 6 — 3440 Eschwege 


Inhalt der Joyce-Databox 2/87: 


CHECKSUMMER — GSX Teil 3 — Kunden- und Lagerkartei 
BONUS: Disketteninhaltsverzeichnis 
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Prüfsummenprogramm 
für Joyce 


Listings für die CPC-Modelle werden 
in dieser Zeitschrift seit einiger Zeit mit 
Prüfsummen abgedruckt. Für Joyce- 
Programme fehlte dieser Service bis¬ 
lang. Hier ist nun ein universelles Prüf- 
ziffernprogramm für den Joyce. Es er¬ 
zeugt Prüfziffern für viele Program¬ 
miersprachen (Assembler, BASIC, Co- 
bol usw.). 

Die Prüfziffern (PZ) werden durch ein 
spezielles Verfahren ermittelt. Daher 
werden im Gegensatz zum Quersum¬ 
menverfahren auch sog. »Zahlendre¬ 
her« erkannt; Die Zeile ’IOO GOTO 
1230’ ergibt daher eine andere PZ als 
’IOO GOTO 1320’, obwohl die Quersum¬ 
men gleich sind. Außerdem fallen nur 
zweistellige PZ an, um die Prüfung zu 
vereinfachen. 

Texte nach dem vereinbarten REM- 
Zeichen (bzw. -Wort) werden nicht ge¬ 
prüft, können also weggelassen wer¬ 
den. Zeilennummem und Leerstellen 
im Programmtext fließen jedoch in die 
PZ ein. Um das Abtippen zu erleich¬ 
tern, werden aufeinanderfolgende 
Leerstellen durch »...«(Punkte) ersetzt. 
Ausgenommen sind einzelne Leerstel¬ 
len (bzw. die letzte Leerstelle einer Fol¬ 
ge), um die Listings gut lesbar zu 
halten. 

Das zu prüfende Programm wird ohne 
Prüfziffern,»...«(Punkte) als Leerstel¬ 
len und mit Leerstelle hinter den REM- 
Zeichen erfaßt. Nach der Sicherung auf 
Disk A: wird es zusätzlich auf der 
Memory-Disk M: im ASCII-Format 


abgelegt. Der Programmname ist belie¬ 
big, die Erweiterung muß ».ASC« sein, 
z.B. SAVE “M:TEST.ASC“,A . 

Nach RUN “CHECK. BAS“ beantwor¬ 
ten Sie die Fragen nach Dateinamen, 
REM-Zeichen, Ausgabe, Zeilenlänge 
und Startzeile. Falls die in den spitzen 
Klammern < > vorgegebenen Werte 
beibehalten werden sollen, brauchen 
Sie nur mit der RETURN-Taste zu be¬ 
stätigen. 

Die Ausgabe kann auf dem Monitor 
< M >, dem Printer < P > oder in 


eine sequentielle Datei <D> erfol¬ 
gen. Mit < f5 > kann die Ausgabe an¬ 
gehalten bzw. fortgesetzt und mit 
<CAN > abgebrochen werden. 

Die bei der Ausgabe auf Disk erzeug¬ 
te Datei (.PRN) kann ggf. mit RPED 
oder ED weiterverarbeitet werden. 
Auch mit LocoScript kann die Datei 
mit der Option »TEXT EINFÜGEN« 
gelesen werden, um z.B. Programm¬ 
beispiele mit PZ in Texte einzubinden. 
Das Programm wird durch Eingabe von 
»end« als Dateiname beendet. 

(H.-J. Meyer) 


VarlablanliBte der Datei check, bas' 


200 

1060 




270 

290 




360 

410 




«40 

470 




500 

530 




650 

610 




690 

650 

710 

1050 


730 

740 




760 

730 




860 

880 




900 

840 




930 

950 




970 

900 




1000 

1020 




1040 

970 




1060 

690 

1040 



ausgabe* 

160 

380 

390 

420 

bell« 

60 

80 

1120 


den 

770 

770 

790 


datel« 

160 

250 

270 

280 

datnami 

560 

580 



druck« 

820 

860 

870 

870 


980 

1000 

1010 

1010 

erste 

520 

530 

530 

710 

esc« 

60 

70 

70 

80 

fehl« 

80 

290 

410 

470 

fahler« 

1090 

1100 

1110 

1120 

in* 

270 

260 

280 

280 


340 

340 

350 

350 


400 

420 

440 

450 


520 

540 



invoff» 

70 

230 

1120 


lnvon« 

70 

230 

1120 


pranaa* 

570 

660 



rak« 

160 

330 

340 

360 

ctartl 

160 

500 

510 

540 

suchdat» 

240 

250 

250 


sunoe 

780 

800 

800 

850 

teil« 

860 

860 

930 

930 

Mahl 

400 

410 

610 

650 

I 

730 

730 

740 

760 

zelle* 

700 

710 

730 

740 

zlen 

460 

470 

470 

860 

zlen* 

160 

440 

450 

480 


310 

560 

570 

590 

630 

670 

880 

910 

930 

940 

940 

950 

1020 






00 

180 

180 

620 

620 


530 






280 

290 

290 

300 

310 

330 

360 

380 

390 

390 

390 

390 

450 

460 

480 

500 

510 

510 


590 

630 

670 

760 

770 

920 

990 




1000 

1000 




840 

900 

970 



770 

770 

790 

800 

600 

760 

770 

800 

820 


870 

930 

940 

1000 

1010 


LI5TIIG >CHECK <, REMARK = >BBK<. 

<89> 10 SEX check.bas 04.11.80 (C) H.J.Xeyer Harsum 
<78> 20 : 

<55> 30 01 ERBOR GOTO 1080 
<80> 40 : 

<85> 50 DBFIIT c,s,w,x:DBFSIG e,z:¥IDTH 90 
<58> 00 bell»=CHR»(7):esc»=CHR»(27) 

<69> 70 invan»=esc»+"p";lnvaff$=eBc»+*q";REX invers an/ 
aus 

<23> 80 fehl*=bell»+escS+"A"4esc»+"K"+CHRS(13):RBX Zail 
e löschen 
<85> 90 : 

<97> 100 RBX Voreinstellung 

<83> 110 DATA EID:.... RBX Dateiname (bzw. ead=Programm 
beenden) 

<28> 120 DATA REX:_ REX Remark is REX ( in Assembler 

= ; in Cobol = * usw.) 

<22> 130 DATA X:. REX Ausgabe (X=Xonitar/P=Printer 

/D=Disk> 

< 0> 140 DATA 40:. RBX Zeilenlünge (10-80) 

<33> 150 DATA 0:...... RBX Startzeile (0-05534) 

<45> 100 RBAD datei*,rak»,ausgabe*,zlen»,start» 

<28> 170 : 

<39> 180 PRIIT esc*"H*esc»"B"; 

<32> 190 : 

<39> 200 PRIIT:PRIIT CHR*(150)STRIIG»(35,154)CHR*(150) 


<10> 210 PRIIT CHR»(149)" JOTCE-CHECKSÜXM 
B R "CHR»(1*9) 

<83> 220 PRIIT CHR*(147>STRI«G»(35,154)CHR»(153) 

<22> 230 PRIIT invonS:FILBS "»*.ASC":PRIIT:PRIIT invof 
f» 

<58> 240 suchdat»=FIID» ("X:#.asc"> 

<94>, 250 IF suchdat*< >""THBI datei*=LBPT*(suchdat» 1 8) 
<27> 200 : 

<85> 270 PRIIT*Dateiname","<"datei»“>",:IIPUT ln» 

<37> 280 ln»=UPPBR»(in»):IF ln»="" THBI in»=datei» 

<25> 290 IF VAL(in»)<>0 OR LBX(in»)>8 THBI PRIIT fehl»; 
:GOTO 270 

<35> 300 IF in»-"EID" THBI PRIIT:EID 
<70> 310 datei»=in* 

<20> 320 : 

<78> 330 PRIIT"HBX-Zeleben","<"rak»">",:IIPUT in» 

<84> 340 IF in»="" THBI in»=rmk» 

<23> 350 IF in» a "lü" THBI in*=CHR»(255) 

<92> 300 rmk»-ln* 

<30> 370 : 

<36> 380 PRIIT"Ausgabe","<"ausgabe»">",:IIPUT in» 

<50> 390 in»=UPPBR»(ln*>:IF in»="" THBI ln*=ausgabe* 

< 3> 400 wahl-IISTR("MPD",ln») 

<22> 410 IF wahl=0 THBI PRIIT fehl»;:GOTO 380 
<37> 420 au8gabe* a ln* 

<23> 430 : 


72 PC 2’87 









STAR-MAIL V2.0 


(JOYCE/JOYCE Plus) 


BUSINESS-STAR V 2.0 


'I 


Das Erweiterungsprogramm zum „LOCOSCRIPT“! 

Das bietet Ihnen STAR-MAIL: 

• Rechnen und Kalkulieren in Locoscripttexten 

• Erstellen von formatierten Tabellen und Formularen in 
Locoscript 

• Vergleichen und Auswahlen zwischen Textabschnit¬ 
ten im Locoscript 

• Interaktives Briefeschreiben mit Locoscript 

• Erstellen von Serienbriefen und Werberundschreiben 
mit Locoscript (nur in Verbindung mit DATEI-STAR) 

• Erstellen von selbstrechnenden Textformularen (für 
Rechnungen, Angebote ) im Locoscript 

• Erstellen von individuellen Verkaufs-, Artikel-, Lager¬ 
listen mit Locoscript 

• Bedrucken von vorgefertigten Formularen mit Loco¬ 
script 

• Drucken von Locoscripttexten auf jedem Fremd¬ 
drucker (CPS erforderlich) 

• Ausführliches Handbuch mit Übungsteil 

• Preis: 98,- DU 


DA TEI-STA RV 2.0 ZTZ 

Die universelle Dateiverwaltung für die JOYCE! 

• Einfache Bedienung durch PULL-DOWN-Menues 

• Freidefinierbare Eingabemaske mit 30 Datenfeldern 

• 1400 Zeichen pro Datensatz 

• Freidefinierbare Such-, Sortier- und Druckmaske 

• Integrierte Kalkulationsmöglichkeiten (Rechenfelder) 

• Suchen/Selektieren/Sortieren/Etiketten- u Listen¬ 
druck .. 

• Preis: 98,- DM 

DA TEI-STA RASTA R-MAIL gibt es im Paket als JO YCE- 
MAILING-SYSTEM für 189,- DM. 


(JOYCE/JOYCE Plus) 

Die professionelle Auftragsbearbeitung für alle JOYCE-Rech- 
ner! 

Bestehend aus Fakturierung, Lagerverwaltung, Mahnwesen, Daten¬ 
verwaltung und Dienstprogrammen: 

Fakturierung: 

• Schreiben von Rechnungen/Lieferscheinen/Auftragsbestäti¬ 
gungen mit automatischer Speicherung auf Diskette (ca 

800 Aufträge im A-Laufwerk/ca 3200 Aufträge im B-Laufwerk) 

• Automatisches Ausbuchen der gelieferten Artikel aus der 
Lagerdatei 

• Eindruck von bis zu 8 Werbetexten in den Auftrag 
Lagerverwaltung: 

• Wareneingang vermerken 

• Umfangreiche Warenkalkulationen 

• Lager- u Verkaufsstatistiken 

• Mindest- u. Meldebestand anzeigen 

• Drucken von Preislisten 
Mahnwesen: 

• Automatisches Mahnen mit drei Mahntexten 

• Schreiben von individuellen Mahnungen 

• Ausdrucken der fälligen Rechnungen/Mahnungen 

• Offene-Posten-Buchhaltung 

Daten Verwaltung: 

• Erfassung des Kundenstamms (ca 700 Adressen im A-Lauf- 
werk, ca. 2800 Adressen im B-Laufwerk) 

• Erfassung des Lieferantenstamms (ca 700 Adressen im 
A-Laufwerk, ca 2800 Adressen im B-Laufwerk) 

• Erfassung des Artikelstamms (ca 850 Artikel im A-Laufwerk, 
ca 3400 Artikel im B-Laufwerk) 

Dienstprogramme: 

• Programmvoreinstellungen ändern 

• Briefkopf entwerfen 

• Mahnungstexte entwerfen 

• Werbetexte entwerfen 

Weitere Informationen zu BUSINESS-STAR entnehmen Sie bitte 
unserem Katalog! Änderungen zum Programm werden auf 
Wunsch angefertigt! 

Preis: 298,- DM inkl Diskette u Handbuch 


FIBU-STAR Plus tZlZtTcYZ, 

Endlich gibt es eine professionelle Finanzbuchhal¬ 
tung für die SCHNEIDER-Computer! 

• Stammdatenverwaltung und Umsatzsteuervoranmel¬ 
dung 

• Frei wählbarer Umsatzsteuerschlüssel zur automati¬ 
schen Ermittlung der Steuerbeträge und deren Ver¬ 
buchung auf den Mehrwert- und Vorsteuerkonten 

• Frei wählbarer Kontenrahmen (bis zu 400 Konten) 

• Frei wählbare Zuordnung der Sach- und rechnenden 
Konten 

• Buchungsjournal, Kontenblätter und Jahresabschluß 

• Summen- und Saldenlisten der Kreditoren, Debitoren 
und Sachkonten 

• Einfaches Erfassen aller Buchungsbelege mit oder 
ohne Protokoll 

• Buchungen können so durchgeführt werden, wie sie 
auf den Tisch kommen, da alle Buchungen chronolo¬ 
gisch und innerhalb eines Datums nach Belegnum¬ 
mern sortiert werden 

• Einfache Bedienung und hohe ABSICHERUNG gegen 
Bedienungsfehler 

• Preis 298,— DM 

Das Programm FIBU-STAR Plus ist erstmals unter dem 

Namen FIBU-M 1980 installiert worden und hat sich seit¬ 
dem sehr oft in der Praxis bewährt. 


STAR-BASE 


(JOYCE/JOYCE Pius) 


STAR-BASE ist ein anwenderfreundliches Datenbank■ 
System mit unglaublichen Fähigkeiten! 


• Eigener Window-Manager 

• Menueorientierte Bedienung und Programmierung 

• Volle Unterstützung des JOYCE-Bildschirms 

• Eingabemaske über 9 Bildschirmseiten 

• 100 Datenfelder pro Eingabemaske 

• 88 Zeichen pro Datenfeld 

• 2060 Zeichen pro Datensatz 

• Max. 8 Zugriffsschlüssel 

• Komplette Indexverarbeitung 

• Suchen u. Selektieren nach allen Datenfeldern 

• 32767 Datensätze pro Datei 

• Verknüpfung von mehreren Dateien 

• Zu jedem Datensatz kann eine Unterdatei mit max 255 
Zeichen pro Satz angelegt werden 

• Kompletter Reportgenerator 

• Star-Base arbeitet voll mit Locoscript zusammen 

• Umfangreiche Rechenfunktionen 

• Serienbrieferstellung 

• Integrierter Texteditor 

• Direkter, menuegesteuerter Datensatzzugriff 

• Mehrspaltige Formulare 

• Eigener Menuegenerator 

• Einfachste Maskendefinition 

• Passwort für eine Datei 

• Ausführliches Handbuch (180 Seiten) 

• Preis: 198,— DM inkl. Diskette u. Handbuch 


Weitere interessante Programme finden Sie in unserem ausführlichen Katalog! 


UELZENER STR 12^J=='=’= = 

2120 LUNEBURG = ~' i= == ==" 

FERNRUF (041 31) 40 25 50 = =~= =L 


Vertrieb für die Schweiz: 

VCS Video-Computershop 
Schaffhauserstraße 473 

P.O. Box 103. CH-8052 Zürich 
Telefon 01 / 3 02 26 00 

Händleranfrage 

erwünscht 

Software-Autoren 

gesucht 

Vertrieb für Österreich: 

Ueberreuter-Media 

Alserstraße 24, A-1091 Wien 
Telefon 4 81 5380 

Unsere Produkte sind 
in allen führenden 
Computer-Shops 
sowie bei Karstadt 
und Brinkmann 
erhältlich! 


□ Senden Sie mir unverbindlich Ihren Katalog 

□ 6128 D664 D464 □ JOYCE 

□ Hiermit bestelle ich per Vorkasse/Nach nah me 

Vorname_ 

Name_ 

Straße_ 

Wohnort_ 

Datum/Unterschrift _ 


(Alle Preise verstehen sich als unverbindliche 
Preisempfehlungen inkl zzg 5,— DM 

Porto u. Verpackung) 











































r~ Professional Computing 


<89> 440 PRHT"Zeilenlange",*<"zlen*">*,:IIPUT in* 

<35> 450 IF in»="" THBI inS*zlen» 

<39> 460 zlen=VALCinS) 

<40> 470 IF zlen<10 OR zlen>80 THBI PRIIT fehl*;:GOTO 4 
40 

<30> 480 zlen*=ln» 

<35> 490 : 

<19> 500 PRIIT"Startzeile","<*start»">",:IIPUT in* 

<81> 510 IF in»="" THBI in*=start* 

<54> 520 erste=VALCin*) 

<50> 530 IF erste<0 OR erste>65534! THEI PRIIT fehl*;:G 
OTO 500 

<46> 540 start*=in* 

<28> 550 : 

<?3> 560 datnam»=* n:"+datei*+".ASC" 

<30> 570 prnnan»="a;"+-datei*+".PRI" 

<35> 580 PRIIT;QPEI"I”, 1, datnaa* 

<74> 590 PRIIT'LISTIIG >“datei**<, REMARK = >"rnk*"<.": 

PRIIT 
<19> 600 : 

< 5> 610 IF wähl02 THE! 650 

<50> 620 LPRIIT esc*"l"CHR»<10);asc*"M"; 

<18> 630 LPRIIT "LISTIIG >"datei*"<, REMARK = >"rmk*"<. 

": LPRIIT 
<27> 640 : 

<16> 650 IF wahl<>3 THEI 690 
<92> 660 OPBI"0*,2,prnnan* 

<30> 670 PRIIT #2,"LISTIIG >";datel*;«<, REMARK = )";rn 
k* j"<.":PRIIT #2," " 

<35> 680 : 

<45> 690 IF EOF(1 > THEI GOTO 1060 
<85> 700.. LIIE ISPUT #1,zeile* 

< 0> 710.. IF VAL(zeile*)<erste THEI 690 
<24> 720.. : 

<16> 730.. x=IISTR(zeile*,SPACE*(2)):IF x=0 THEI 760 
<33> 740.. KID*(zeile*,x, 1)=".".-GOTO 730 
<30> 750.. : 

<13> 760.. x=IISTR(zelle»,rnk*+" ■) 

<44> 770.. IF x=0 THEI clen*LBI(zeile*):ELSB clen=x+LBI 
(rak*)-l 

<68> 780.. sunme=0 

<44> 790. . FOR x=l TO den 


<85> 800.... auane® (sunne+ (ASC(KID*(zeile*,x, 1))AID 127 
>*x)K0D 99 
<70> 810.. IBXT 
<67> 820.. druck*=zeile» 

<27> 830.. : 

<48> 840.. IF wahlOl THEI 900 
<47> 850.. PRIIT USIIG"<##> "ieunae; 

<50> 860.. teil»=LEFT#(druck*,zlen):PRIIT teil* 

<47> 870.. druck*=MID*(druck*,zlen+1) 

<61> 880.. IF LBKdruck*>>0 THBI PRIIT SPACE*(5)GOTO 
860 

<39> 890.. : 

<27> 900.. IF wahl<>2 THBI 970 

<69> 910.. PRIIT USIIG"< ##### >";VAL(druck*); 

<7?> 920.. LPRIIT USIIG"<##> 'isuane; 

< 6> 930.. t#il*=LEFT»(druck*,zlen):LPRIIT teil* 

<42> 940.. druck*=MID*(druck»,zlen+1> 

<73> 950.. IF LBI(druck*)>0 THBI LPRIIT SPACB*<5);:GOTO 
930 

<34> 960.. : 

<63> 970.. IF wahl<>3 THBI 1040 

<83> 980.. PRIIT USIIG"< ##### VAL(druck»); 

<83> 990.. PRIIT #2,USIHG"<##> ";sunae; 

<67> 1000.. teil*=LBFT»(druck»,zlen):PRIIT #2,teil* 

<88> 1010.. druck*=MID*(druck*,zlen+1) 

<18> 1020.. IF LEI(druck*)>0 THEI PRIIT #2,SPACB»<5>;:G 
OTO 1000 

< 1> 1030.. : 

<28> 1040.. IF IIKEY*®CHR*(8) THBI GOTO 1060 

<92> 1050 GOTO 690 

<85> 1060 CLOSE: PRIIT: GOTO 200 

<20> 1070 : 

<78> 1080 RBK Fehlerbehandlung 

<49> 1090 fehler»=" Fehler Ir."+STR»(BRR)+" in Zeile Ir 
."+STR*(BRL)+". " 

<97> 1100 IF ERR=53 THEI fehler*®" Datei nicht verbände 
n. " 

<20> 1110 IF ERL=230 THEI fehler*®" Keine ASCII-Datei v 
orhanden. " 

<71> 1120 CLOSE:PRIIT invan»;fehler»;invaff*;bell*:PRII 
T 

<64> 1130 IF ERL=230 THEI RESUKB 270 ELSE RBSUME 200 


JOYCE 

SOFTWARE 


MARTIN KEMPENICH 
COMPUTER HARO- U. SOFTWARE 
ZETASTRASSE 13 
6220 RÜOESHEIH 4 


DENTAFOX 

Di« professionelle Software für zahntechnische Labore, 
Abrechnung nich BEL, automatische Monataabrechnung mit 


Soldbuch, Ttchnikur-, Material- 
600 Rechnungen/Monat, 40 Kunde 
Ausf, Handbuch, f. Joyce* oder 


und Ümsatzstatistik 
Jahresbilanz, u.v.a, 
Joyce mit 1 MB Laufwerk 

nur DM Q9a. 


SSP-SOFT 

Die Komplettldsunc ___ . 

Mit AuftragsverwaTtung, Materialstamm, 

Kalkulation, Bearbeitungsstufen, Gleichzeitiges Bear¬ 
beiten von 4000 Material- und 200 Auftragspoaitionen. 
Ausführliches Handbuch, Z.Z, nur für Joyce* PC« 8512. 

nur DM 1990.— 


FIBUFOX 

F 1 nanzbuc hha 1 tung 

40 Konten mit vari . 

pro Monat Monatsbiianz mit Balken 
meldung. Ausführliches Handbuch 


für kleine und mittlere Betriebe, 
blem Ust,-Schlüssel. 1000 Buchungen 
“ ‘ graphik, Ust,-Voran- 
ur Joyce und Joyce-*, 


lur DM 198. — 


WEITERE QUAUTATS -SOFTWARE 


ADRESSENVERUALTUNG für 1200 Adressen, suchen, selek¬ 
tieren, Aufkleber drucken, u.s.w. 
Joyce u. Joyce plus 

DM 49 . O O 


HAUSVERWALTUNG 


KFZ - ABRECHNUNG 


TERMINKALENDER 


für private Anwender mit umfangr. 
Tabellen, Balkengraphiken u.v.a. 
Joyce u. Joyce plus 

DM SO . O O 

Kostenabrechnung für alle KFZ mit 
Tabellen und Graphiken, z.B. Ben- 
«brechnung mit Verbrauchsana1yse, 
Kostenabrechnung, Statistiken u.a. 
JOYCE u, JOYCE plus 

DM SD.OO 

Terminplaner mit Kalender, Termin¬ 
übersichten und vielen Funktionen, 
Joyce u, Joyce plus 

DM SG» . OO 


Versand Vorkaase oder Nachnahme -» 5 OH Versandkoata 
Infos anfordern t Hind1 eranfragen erwünscht 


P 

P 

P 


WANTED 


Sind SIE etwa derjenige, der 
sich bis heute allen Vorzügen 
unserer MOUSEPACK-Systeme 
für CPC und JOYCE zum Trotz 
noch nicht in den Besitz eines 
dieser deutschen Qualitäts¬ 
produkte gebracht hat? 

Stellen Sie sich freiwillig! 


Reward 


Bearbeitungsgebühren: 

DM 228.- für den CPC-Besitzer 
DM 249.- für den Joyce-Besitzer 


Rechtsbeistand oder Selbstanzei g e bei: 

Gerdes Imperial SOFlWare Systems 

Heidegartenstraße 36 • D-5300 Bonn 1 
Telefon 02 28/252474 
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LAKA-KUKA 



Beim nächsten Menue kann man aussuchen, ob man Einträge 
bearbeiten, Einträge ausdrucken, die Vertreterstatistik oder 
neue Datei anlegen will, oder ins Hauptmenue zurück geht. 
Bei Anwahl der Nummer I gelangt man zum nächsten Me¬ 
nue »SUCHEN«. Es kann nach allen Begriffen gesucht wer¬ 
den. Man braucht nur den Anfangsbuchstaben einzugeben 
und dann das Abkürzungszeichen * so werden z.B. alle A.. .’s 
in den Speicher geladen und am Bildschirm ausgegeben. 
Durch Drücken der ENTER-Taste kann man alles durchblät¬ 
tern. Im unteren Bereich wird ein Insert eingeblendet, wo 
man mit der Fl-Taste ändern, mit der F3-Taste löschen und 
mit der FS-Taste einen Ausdruck von diesem Kundenkartei- 
biatt machen kann. Weiterhin kann man mit der -f-Taste ins 
Lagerprogramm wechseln. Mit der EXIT-Taste kommt man 
wieder ins Menue zurück. Beim Ändern darf nur mit den 
Cursorpfeilen gearbeitet werden, denn der Cursor springt au¬ 
tomatisch an denAnfang der nächsten Zeile. Wenn man im 


Als ich den Joyce erwarb, kam der Gedanke, ihn nicht nur 
zur Textverarbeitung zu nehmen, sondern auch als Unterstüt¬ 
zung in meinem Beruf. Somit begann ich die Erstellung ei¬ 
ner Kunden- und Lagerkartei für mein Lager. Der Joyce wur¬ 
de mit einem zweiten Laufwerk und der RAM-Erwciterung 
ausgerüstet und los ging es. 

Die Problemstellung war eine Kundenkartei und eine Lager¬ 
kartei zu vereinigen und sie so komfortabel wie nur möglich 
zu machen. Ein Programm also, das sich selbst während des 
Ablaufes erklärt und von meinen Mitarbeitern auch verstan¬ 
den bzw. bedient werden kann. 

Also probieren und noch einmal probieren. Nach ca. drei 
Monaten war das Programm soweit. Der Programmablauf 
wird durch Menues gesteuert. Es werden die Funktionstasten 
Retum/Enter und die EXIT-Taste verwendet. Vor der Arbeit 
mit LAKA und KUKA müssen die Dateien: MENUE.BAS, 
LAKA.BAS, KUKA.BAS, DATUM.LIB und PASSWD.LIB 
in Laufwerk M: kopiert werden. 

Beschreibung des Ablaufes KUKA: 

Frage nach dem aktuellen Datum. Durch Drücken der EN- 
TER/RETURN-Taste wird der Vorschlag angenommen oder 
man gibt das aktuelle Datum ein. Beim nächsten Menuepunkt 
kann man sich durch die Betätigung der Funktionstasten aus¬ 
suchen, ob man das Kunden- oder Lagerprogramm starten 
will. Weiterhin ist eine kurze Anleitung zu diesem Programm 
enthalten. Mit der EXIT-Taste beendet man das ganze Pro¬ 
gramm. Jetzt drücken wir die Fl-Taste. Es erscheint das 
Programm-Login. Man kann diesen Menuepunkt auch mit 
der Enter-Taste übergehen, doch werden dadurch gewisse Da¬ 
ten von Kunden auf dem Bildschirm nicht angezeigt (z.B.: 
Sonderkonditionen). Man kann diesen Bereich für bestimmte 
Personen somit unzugänglich machen. Datum und Password 
werden aus einer Datei mit der Extension .LIB ausgelesen; 
zu deren Erstellung nachfolgend noch Informationen gege¬ 
ben werden. Achtung - bei der Eingabe des Namens und des 
Passwords beim Login ist auf Groß-/Kleinschreibung zu 
achten! 


Kund*iikart»i - KUKA - Version 1 1 







»tönaaii 




In 4Usm Frograjwteil kann aan diese Prograwipunkt* auStühlen oder das Prograwi 
■it ItUI beenden. Bitte die IflfSÜül verwenden ! 


MBEBamaig 

Als erstens körnt die Abfrage nach de* Naaen 
n, inden na 


K e auch ubergeben, inden aan die 
tiaate Eintragungen gesperrt ( 


ein Unteraenü. Nach allen 
l.lucl 


dea 1,Buchstaben dieses , 
e A..,' ausgegeben oder S 


alle Daten in den Spi 
Unteraenü emgeblena< 


dea Passwort. Kan kann diese Ein¬ 
drückt. Soait sind 

K rsl. DATEN). Nach drucken der 1.Taste erscheint 
nkten können SIE die Daten suchen. Als Abkürzung 
dieses 0 Zeichen genoaaen «erden. So «erden 
'S leicli 


eicher geladen. Bei jede« 
et, das sich selbst erklär 


geben nur dieses Zeichen ein, dann «erden 


Uli verwendet »erden: Die 
enDaten träger. 


mraiflBflfnagmni 

Kundenkarteimenue die Nummer 2 drückt, wird ein Unter- 
menue eingeblendet, wo die Möglichkeit besteht, das Auf¬ 
listen oder das Ausdrucken in Etikettenform des Kundenkar¬ 
te iblattes vorzunehmen. Bei Punkt 3 wird ein neuer Eintrag 
in der Kundenkartei vorgenommen. Bei Punkt 4 wird am 
Bildschirm eine Vertreterstatistik angezeigt (Umsätze von die¬ 
sen in KG). 

Beschreibung des Ablaufes LAKA: 

Wenn man im Hauptmenue die F3-Taste drückt, kommt man 
sogleich in das Lagerprogramm. Man kann auch vom Kun¬ 
denprogramm mit der +-Taste in das Lagerprogramm wech- 
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sein oder mit der ENTER-Taste von dort wieder in das Kun¬ 
denprogramm. Die Abarbeitung und die Bedienung des Pro¬ 
grammes ist etwa gleich wie die des Kundenprogrammes. 
Eine Besonderheit beim Lagerprogramm ist, daß es eine au¬ 
tomatische Bestandsüberwachung enthält. Es gibt ein eige¬ 
nes Zuwachskonto und ein eigenes Abbuchkonto. Auch hier 
dürfen beim Ändern des Kontos nur die Cursortasten genom¬ 
men werden. Die Enter-Taste bucht den Datensatz, auch beim 
Kundenkonto, auf dem Datenträger. Es wird ein Protokoll er¬ 
stellt, damit man sehen kann, was bestellt worden ist. Bei 
Punkt 4 im Lagerkarteimenue kann man die Bestelldatei lö¬ 
schen. 

Vorschläge zur Erweiterung: 

Im Hauptmenue für Laka+Kuka-Menue kann man zwischen 
den Programmzeilen 245 - 270 noch einige Programme 
durch den CHAIN- Befehl einfügen. Wenn Sie dies machen, 


müssen Sie auch die Zeilen 180 - 230 erweitern. In meiner 
Version wurde hier z.B. das Programm »Notizblock« aus 
CPC International eingebunden! Die Möglichkeit des Auf¬ 
rufs wurde im Menue beibehalten. Hier muß nur zusätzlich 
zu den oben erwähnten Programmen zusätzlich NOT- 
BOOK. BAS in Laufwerk M: kopiert werden. 

Erstellen der *.LIB Dateien: 

Bitte verwenden Sie für die Erstellung der PASSWD.LIB- 
Datei und der DATUM.LIB-Datei das Dienstprogramm von 
CP/M plus »ED.COM«. Rufen Sie wie folgt auf: 

ED DATUM.LIB und geben Sie das Datum »tag«,»mo- 
nat«,»jahr«, bitte ohne Leerstellen ein. Bei der Datei 
PASSWD.LIB gehen Sie bitte genau so vor: 
»name«,»passwd«,»datum«. Das Datum ist eine Kontrolle, 
um nachzusehen, wann dieses Passwort erstellt worden ist. 

(G. Engelbert) 




< 3> 370 OPEI "i",#l,"m:datum.lib" 

Listing 1: Das Hauptmenue 


<92> 380. IIPUT #1,tag*,mon»,Jahr*: CLOSE 1 



<42> 390 IF ex=l THEI RETURI 

LISTIIG >MEEü<, REMARK * >rem<. 


<37> 400 GOSUB 300 



<12> 410 t=VAL(tag#): hfVAL( mon*):J=VAL<Jahr») 

<78> 10 VIDTH 255 


<24> 420 t=t+l:dif=j-l980 

<30> 20 DIR tage(12):FOH 1=1 TO 12:READ tage(i): IEXT i 


<87> 430 IF t<=tage(m>THEI 470 

<72> 80 REM geschrieben von Graman Engelbert 4020 Linz 


< 2> 440 IF (t>tage(m> AID m<>2) THEI t=l:GOTO 460 

<37> 90 REM weitere Programmteile: LAKA.BAS und KUKA.BA 


<58> 450 IF (dif/4-IIT(dif/4)=0 AID t=29) THEI 470 ELSE 

S, IOTIZBLOCK.BAS, DATUM.LIB, PASSVD.LIB 


t=l 

<97> 100 REM 


<75> 460 IF m<12 THEI n=m+l ELSE m=l:J=j+l 

< 4> 110 GOSUB 640: REM escapes initialisieren 


<45> 470. tag*=RIGHT*(STR*(t),LEI(STR*(t)>-l):mon*=RIGH 

<38> 120 GOSUB 300 


T*(STR*(m),LEI(STR*(m))-1) 

<25> 125 REM entrypoint 


<52> 480. j ahr*=RIGHT*(STR*(J >,4) 

<79> 130 GOSUB 350 : REM datum eingeben 


<53> 490 PRIIT 

<42> 140 VIDTH 255 


<41> 500 z=8:s=3: GOSUB 790:PRIIT inv*" Bitte das heuti 

<53> 145 date*=tag*+"."+nnn$+","+J ahr* 


ge Datum eingeben, ader mit der EITER-Taste den Vo 

<34> 147 COMMOI date* 


rschlag annehmen "nrm* 

<69> 150 ex=l:GOSUB 370:ex=0 


<95> 510 z=18:s=2B: GOSUB 790:PRIIT " TAG (tt). :" 

<53> 153 VIDTH 255 


1 tag* 

<30> 155 COMMOI date* 


< 8> 520 z=20:6=28: GOSUB 790:PRIIT " MDIAT (mm)- :" 

<48> 160 GOSUB 640:GOSUB 300 


;mon*: 

<76> 180 z=10:s=24:GOSUB 790:PRIIT inv*" Kundenkartei s 


<42> 530 z=22:6=28: GOSUB 790:PRIIT" JAHR (JjJj>... 

tarten. Fl "nrm* 


Jahr* 

<83> 181 z=12:6=24:GOSUB 790:PRIIT inv*" Lagerkartei st 


<81> 540 z=18:6=45:GOSUB 790:IIPUT " H ,t*:IF t»=" M THEI 

arten. F3 "nrm® 


580 :ELSE IF VAL(t*)<32 THEI tag*=t* ELSE 540 

<43> 185 z=14:s=24:GOSUB 790:PRIIT lnv$* Anleitung zum 


<25> 550 z=20:GOSUB 790: IIPUT"",m*: IF m*=" M THEI 580 EL 

Programm. .. EITER "nrm* 


SE IF VAL(m*)<13 THEI aon*=m* ELSE 550 

<33> 190 z=16:s=24:GOSUB 790:PRIIT inv*" lotizblock sta 


<63> 560 z=22:GOSUB 790:IIPUT"",J*:IF j*<>"" THEI Jahr* 

rten....F7 "nrm* 


=J* 

<58> 210 z=18:s=24:GOSUB 790:PRIST invS* Programm beend 


<73> 580 OPEI "a",#l,"m:datum.lib* 

en. EXIT "nrm* 


<48> 590 VRITE #1.tag»,man*,Jahr» 

<28> 220 z=20:6=24:GOSUB 790:PRIIT invS" Ihre Vahl: _"n 


< 5> 600 CLOSE 

rmS; lftS; 


<41> 610 GOSUB 300 

<93> 230 a»=IIKBY*:IF a*OCHR*(26) AID a*OCHR*U8) AID 


<76> 620 RETURI 

a*OCHR*<13) AID a*OCHR$<17) AID a*OCHRS<18> AI 


<57> 630 DATA 31,28,31,30,31,30,31,31,30.31,30,31 

D aSOesc* THEI 230 


<46> 640 esc*=CHR*(27) 

<15> 235 z=24: s=24:GOSUB 790:PRIIT inv*" BITTE VARTBI ! 


<21> 650 REM cls* Schirm löschen, hom* Cursor hone 

t "nrm* 


<36> 660 hom*=e6c*+"H": cls*=hom*+esc*+"E" 

<6B> 240 IF a*=CHR*(27) THEI z=26:6=10:GOSUB 790:PRIIT 


<14> 670 REM inv* Invers ein... nrm* Invers aus 

ecl*;inv*" Legen Sie ln Laufwerk A: nun wieder die 


<40> 680 inv*=esc*+"p":nrm*=esc$+"q" 

Syatemdiak ein !! "nrm*:z=27:s=35:GOSUB 790:PRIIT 


<27> 690 REM und* Underline ein nun* Underline. aus 

ecl*;lnv$" RETURI !! "nrm»;:IIPUT n*:VIDTH 89:PRI 


<93> 700 und*=esc*+"r":nun*=esc*+"u" 

IT cl8»:SYSTEM 


<62> 710 REM ecl*= erase Cursor line. Ift*=cur6ar left 

<43> 245 IF a*=CHRS(13) THEI GOTO 1000 


<11> 720 ecl*=esc*+"1":lft*=esc*+"D" 

<76> 250 IF a*=CHR*<16) THEI CHAII"m:notbaok" 


<48> 730 REM rgt*= Cursor right. cup*=cursor up 

<38> 260 IF a*=CHR»(26) THEI CHAII"m:kuka",1 


<53> 740 rgt*=esc*+"C":cup*=eac*+*A" 

<87> 270 IF a*=CHRS(17) THEI CHAII"m:laka" , 1 


<20> 750 REM dwn*= Cursor down. . bel*= piepston 

<41> 280 GOTO 220 


<79> 760 dwn»=esc*+"B": bel*=CHR*(7) 

<42> 2S0 EID 


<87> 770 RETURI 

<79> 300 PRIIT cle»; 


<88> 780 REM position Cursor 

<70> 310 FOR z=l TO 3:s=0:GOSUB 790:PRIIT lnv*;SPACE*(8 


<31> 790 PRIIT esc*+"Y"+CHR*(z+32)+CHR*(s+32); 

9);nrm*: HEXT z 


<74> 800 RETURI 

<97> 320 z=2:6=20: GOSUB 790:PRIIT inv*"HAUPTMEHü für LA 


< 5> 1000 PRIIT cls* 

BU und KUKA Vereion l.l"nrm»; 


<48> 1010 z=2:s=60:GOSUB 790:PRIIT inv*" Programmbeschr 

<49> 330 IF JahrSO"" THEI z=2:s=62: GOSUB 790:PRIIT in 


eibung "nrm* 

vt; date»; nrm* 


<76> 1020 z=5:s=0:GOSUB 790:PRIIT invS" MEIü für KUKA, 

<77> 340 RETURI 


LAKA und IOTIZBLOCK "nrm* 

<12> 350 REM datumekorrektur und elngabe 


<68> 1030 PRIIT 
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<16> 1040 PRIET* In diesen Pragranntell kann nan diese 
Pragrammpunkte auswählen oder das Programm " 

<22> 1050 PRIET" mit "inv*" EXIT " 11 x 1118 " beenden. Bitte 
die *inv*" F-TASTEB "nrmS" verwenden ! GOSUB 300 
0 

< 68 > 1060 z=ll:s=0:GOSUB 790:PRIET inv»" KUKA-MEEü Punk 
te "nra* 

<80> 1070 PRIET 

<81> 1080 PRIET" Als erstens kommt die Abfrage nach dem 
Eamen und dem Passwort. Man kann diese Ein-" 

<63> 1090 PRIET" gäbe auch übergehen, indem man die "in 
v»" EHTER-Taste "nrmS" drückt. Somit sind" 

< 5> 1100 PRIET" bestimmte Eintragungen gesperrt (persl 

. DATEB). Sach Drücken der 1.Taste erscheint" 

<40> 1101 PRIET" ein Untermenü. Mach allen diesen Punkt 
en können SIE die Daten suchen. Als Abkürzung" 

<19> 1102 PRIET" kann nach dem 1.Buchstaben dieses "inv 
S" * "nrmS" Zeichen genommen werden. So werden" 
<55> 1103 PRIET* z.B. alle *A...* ausgegeben oder SIE g 
eben nur dieses Zeichen ein, dann werden" 

<70> 1104 PRIET" alle Daten in den Speicher geladen. Be 
i jedem "inv*" DATBHBLATT "nrmS" wird ein" 

<35> 1105 PRIET" Untermenü eingeblendet, das sich selbs 
t erklärt. Es dürfen beim "inv*" ÄEDBRS "nrm* 

<90> 1108 PRIET" nur die "inv*" CURSOR-TASTE! "nrm*" ve 
rwendet werden. Die "inv*" RETURE/EETER-Taste "nrm 
** speichert" 

<27> 1107 PRIET" den Datensatz auf den Datenträger." 
<90> 1108 GOSUB 3000 

< 0> 1109 z=29:s=27:GOSUB 790:PRIET inv»" Bitte die EST 

BR-Taste drücken "nrm* 

<89> 1110 a*=IEKEY*:IF a*<>CHRS(13) THEE 1110 
<14> 1111 PRIET cls» 

<9B> 1112 z=8:s=0:GOSUB 790:PRIET inv*" LAKA-Menü Punkt 
e "nrm* 

<76> 1113 PRIET 

<20> 1114 PRIET" Die Bearbeitung dieses Programmteiles 
erfolgt genauso wie im "inv*" KUKA-Menü "nrm*" . 
<54> 1115 PRIET" Man kann ständig zwischen den beiden P 
rogrammen "inv*" KUKA - LAKA "nrm*" wechseln . Es 
wird" 

<92> 1116 PRIET" immer ständig das aktuelle Datum angez 
eigt. Beim "inv*" LAKA-Menü "nrm*" gibt es ein eig 
enes" 

<53> 1117 PRIET inv*" ZUWACHS-Konto und ein ABBUCH-Kont 
o "nrm*" . Beim Abbuchen wird automatisch mit dem" 

< 1> 1118 PRIET" Drucker ein Protokoll erstellt, auf de 

m vermerkt wird, was nachbestellt wurde. Es ist" 
<13> 1119 PRIET" auch eine "inv*" MIBDEST-STAED "nrm*" 
Überwachung enthalten. Sie werden nach Unterschrei 
tung des* 

<49> 1120 PRIET" Mindesstandes gefragt, wieviel Sie von 
diesem Produkt nachbestellen wollen. 

<71> 1121 PRIET 
<83> 1124 PRIET 

<83> 1125 PRIET" Ich wünsche Ihnen viel Freude mit dies 
em Programm " 

< 88 > 1126 GOSUB 3000 

< 4> 1127 z=29:s=27:GOSUB 790:PRIET inv*" Bitte die EXI 

T-Taste drücken "nrm* 

<27> 2000 a*=IEKEY*:IF a*Oesc* THEE 2000 
<90> 2001 GOTO 160 

<76> 3000 FOR i=l TO 89: PRIET"BEXT i: RETURH 


Listing 2: Die Lagerkartei 

LISTIIG >LAKA<, REMARK = >rem<. 

<71> 1 VIDTH 255 
< 2> 2 COMHOE date* 

<22> 5 CLBAR ,,,,512 
<82> 6 satz*=270 

<66> 20 REM geschrieben von Graman Engelbert 4020 Linz 
<35> 25 REM. Schneider Joyce mit 368k ram, 1 floppy 180 
k und 1 floppy 720k 
<48> 30 BUFFERS 24 


<42> 
< 21 > 
<56> 
<23> 
< 6 > 
<4ß> 
< 20 > 
<59> 

<14> 

<16> 

<91> 

<69> 

<32 > 

<80> 

<90> 

<94> 


<80> 

<69> 

<96> 

<39> 

<51> 

<85> 

<69> 

<35> 

< 4> 
<63> 
<17> 
<50> 
<23> 
<92> 

<28> 

<42> 

< 66 > 

<18> 

<97> 

<42> 

<62> 

<80> 

<24> 

<35> 

< 11 > 

<28> 


Einträge ausdruck 
Eeuer Eintrag.... 


40 REM escapes definieren 
50 GOSUB 50000 
60 REM datum holen 
70 GOSUB 59000 
200 REM menü 

210 uber»=* Lagerkartei - Menü " 

220 GOSUB 50400 

230 z=10:s=24:GOSUB 50100:PRIET inv*" Einträge bea 

rbeiten. 1 " 

240 z=12: GOSUB 50100:PRIET inv*“ 
en.2 " 

250 z=14:GOSUB 50100:PRIET inv*" 

. 3 " 

260 z=18:GOSUB 50100:PRIET inv*" Beetelldatei löse 
hen.4 " 

263 z=18:GOSUB 50100:PRIET inv*" leue Datei anlege 
n. 5 " 

270 z=20:GOSUB 50100: PRIET inv*" Zurück ins Hauptm 
enü ... EXIT ";nrm* 

280 z=24:GOSUB 50100:PRIET inv*" Ihre Wahl: _";nrm 
»;lft*; 

290 a*=IEKEY*:IF <a*<"l" OR a*>"5"> ASD a*OCHR*<2 
7) THEE 290 

300 IF a*=CHR* <27) THBB VIDTH 87:z=22:s=24:GOSUB 5 
0100:PRIET inv*" BITTE WARTEE !! "nrm*:CHAIE "m:me 


nü*,150 

305 PRIET inv*;aS;nrm*; 

310 a=VALCa*):. 0E a GOTO 1000,3000,4000,400,500 
320 GOTO 280 

400 REM bestelldatei löschen 
410 OE ERROR GOTO 460 
420 KILL "a:Bestell" 

430 OE ERROR GOTO 0 

440 s=25:z=24:GOSUB 50100:PRIET inv*" Bestelldatei 


gelöscht ! "nrm* 

450 FOR i=0 TO 2000:BEXT i:GOTO 200 

460 RESUME BEXT 

500 REM neue datei anlegen 

510 uber$=" Eeue Datei anlegen " 

520 GOSUB 50400 

530 z=12:s=24:GOSUB 50100:PRIET inv*" Bitte leere 
Diskette in Laufwerk A einlegen t " 

540 z=14:s=24:GOSUB 50100:PRIET " RETURH für weite 
r ! EXIT für Menü ! "nrm* 

550 a*=IEKBY*:IF a*OCHR*(13) AHD a*Oesc* THEE 55 
0 

555 IF a*OCHR$ (13) THBH GOTO 200 

557 OE ERROR GOTO 700 

558 z=20:s=24:GOSUB 50100:PRIET inv»" Datei wird e 


röffnet f "nrm* 

560 CREATE 1,"a:lakadat","a:lakaind",2,satz% 

570 CLOSE 1 

580 OB ERROR GOTO 0 

590 GOTO 200 


700 REM error behandlung 

710 IF ERR-58 THEE er*=" Datei existiert bereits i 


720 IF ERR=67 OR ERR=61 THEE er*=" Diskette voll ! 


< 8> 730 z=27is=24:GOSUB 50100:PRIBT Inv*" FEHLER :. *e 

r* 

<42> 740 z=29:b=24: GOSUB 50100: PRIET "Diskfehler aufget 
reten ! Bitte RETURH für weiter ! "nrm* 

<93> 750 a*=IEKEY*:IF a*<> CHRS(13) THEE 750 ELSE RESUM 
E HEXT 

<65> 900 REM entrypoint für chain 
<72> 910 GOSUB 50000 

< 0> 920 BUFFERS 24 

<46> 1000 REM einträge bearbeiten 
<24> 1010 uber*=" Einträge bearbeiten " 

<55> 2000 REM 

<35> 2030 REM maske für Schlüssel 

<82> 2040 GOSUB 51000 

<69> 2045 IF ex=l ASD re»>7 THEE RETURS 

< 2> 2050 IF re%>7 THEE 200 
<32> 2060 GOSUB 50400 

<18> 2070 z=15:s=32: GOSUB 50100:PRIET inv*" Bitte Warte 
n "nrm* 

<28> 2080 meta=IESTR(sch$,> 

<31> 2090' GOSUB 59200 

<14> 2093 IF re«=2 AED ex=0 THEE 52100 

<29> 2095 REM suchen mit metacharacter 
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<68 > 

2100 

IF netaOO THEI GOSUB 52000:GOTO 2120 

<55 > 

2105 

REX suchen ohne metacharacter 

<73 > 

2107 

sch*=sch*+SPACE*(1(reü)-LHI(sch*)) 

< 1> 

2110 

erg=SEEKKEY(1,0, re% ,sch») 

<56> 

2115 

GET 1 

< 3> 

2120 

IF erg<> 0 THEI GOSUB 50500:IF ex=0 THEI 2145 


ELSE 

RETURI 

<53> 

2130 

GOSUB 50600 

<53> 

2135 

IF ex=l THEI 2150 

<11> 

2140 

GOSUB 53000 

<65> 

2145 

CLOSE 1 

<30> 

2150 

IF ex=l THEI RETURI ELSE 2000 

<70> 

3000 

REX ausdruck nach Schlüssel 

<52> 

3005 

CLOSE 1 

<13> 

3010 

über»*" Ausdruck nach Schlüssel ":ex=l 

<62> 

3020 

GOSUB 53220 

<81> 

3030 

IF a*=esc* THEI CLOSE l:ex=0:GOTO 200 

<62> 

3041 

GOSUB 2000 

<33> 

3042 

IF ergOO OR reX>7 THEI 3000 

<68 > 

3043 

LPRIIT:LPRIIT 

<58> 

3045 

IF dr*="ett" THEI GOSUB 53340 ELSE GOSUB 5330 

<26> 

3050 

GOSUB 53800 

<35> 

3060 

IF ergOO THEI 3000 ELSE 3045 

<34> 

4000 

REX neuer eintrag 

<40> 

4010 

über»*" leuer Eintrag " 

<18> 

4020 

ex=l:IF pw*<>"ok" THEI flag=l:pw*="ok" 

<32 > 

4025 

GOSUB 59200 

< 4> 

4027 

REX txt* löschen 

<81> 

4030 

GOSUB 50800 

<37> 

4040 

REX schirmmaske 

<14> 

4050 

GOSUB 53000 

<34> 

4055 

ex=0:IF flag=l THEI flag=0: pw*="" 

<51> 

4060 

CLOSE 1 

<48> 

4070 

GOTO 200 

<89> 

49998 

CLOSE 1 

<88> 

49999 

EID 

<65 > 

50000 

esc*=CHR*(27) 

<53> 

50005 

REX cls* Schirm löschen, hom* Cursor hone 

<56> 

50010 

ham»=esc*+*H": cls*=hom*+esc»+"E"+esc*+"v" 

< 0> 

50015 

REX inv* Invers ein... nrm* Invers aus 

< 8> 

50020 

inv*=esc*+"p":nrm»=esc*+"q" 

<47> 

50025 

REX und* Underline ein nun» Underline. aus 

<88> 

50030 

und*=esc*+"r":nun*=esc*+"u“ 

< 4> 

50035 

REX ecl*= erase Cursor line. lft*=cursor lef 

<34> 

50040 

ecl»=esc*+"1":lft*=esc*+"D" 

<51> 

50045 

REX rgt*= cur^ar right. cup»=cursor up 

<42> 

50050 

rgt*=esc*+"C":cup*=esc»+"A" 

<25> 

50055 

REX dwn*= Cursor down.. bel*= piepeton 

<45> 

50060 

dwn»=esc*+"B":bel*=CHR*(7) 

<49> 

50065 

REX dimensionierung der div felder 

<20> 

50070 

DIK z(20),s(20),1(12),txt»(12),bf*(14,6) 

<45> 

50071 

1(0)=30:1(1)=8:1(2>=20 

<17> 

50075 

REX Wertzuweisungen an die felder 

<91> 

50080 

FOR i=0 TO 11: READ s(i):IEXT i 

<44> 

50081 

DATA 21,18,20,36,46,24,26,20,20,26,24,179 

<78> 

50090 

RETURI 

<84> 

50099 

REX position Cursor 

<14> 

50100 

PRIIT esc*+"Y"+CHRS(z+32)+CHR»(s+32); 

<49> 

50110 

RETURI 

<70> 

50200 

REX titelzeile 

< 0> 

50210 

PRIIT:PRIHT cls*:s=l:F0R z=l T0 3:GOSUB 5010 


0:PRIIT inv»;SPACE*(87);nrn»:IEXT z 

<15> 

50225 

z=2:s=2:GOSUB 50100:PRIIT inv»;txt*(3);nrm* 

<36> 

50227 

z=2:s=22:GOSUB 50100:PRIIT inv»" Lagerkartei 


- LAKA - Version 1.1 ",dateS;nrm* 

<60> 

50230 

RETURI 

< 2> 

50300 

sgabe 

REI hole text von der tastatur ohne schlrmau 

<83> 

50310 

txt»*"" 

<31> 

50330 

a*=IIKBYS: IF a*=" H THEI 50330 

<75> 

50333 

IF a*=CHR»(13) THEI RETURI 

< 7> 

50335 

PRIIT inv»"f"nrm»; 

<20> 

50340 

txt*=txt*+a* 

<55> 

50350 

GOTO 50330 

<59> 

50400 

REX über* 

<49> 

50410 

GOSUB 50200 

<70> 

50420 

2 = 7 : s=39-LEI(über*>/2:GOSUB 50100:PRIIT inv* 


;über*;nrm* 

<66> 

50430 

RETURI 

<61> 

50500 

REM fehler wenn kein weiterer eintrag mehr v 


orhanden 


<93> 
<69 > 


<80> 

<59 > 
<69 > 

< 4> 
<74> 

< 12 > 

<70> 

<72> 

<80> 

< 8 > 

< 88 > 

<53> 

<79> 
<27 > 
<89 > 
<70> 
<71> 
<90> 
< 6 > 

<5ß> 

<40> 


50501 IF ex=2 THEI RETURI 

50505 IF ex=0 THBI z=29:s=10:GOSUB 50100:PRIET ecl 
*;invS" Eintrag ln der Datei nicht gefunden ! RETU 
RI für weiter ! ";nra*; 

50507 IF ex=l THEI z=29:s=30:GOSUB 50100:PRIHT ecl 
*;inv*" RETURI für weiter ! ";nrm* 

50510 a*=IIKBY*: IF a*OCHRS(13> THEI 50510 
50530 RETURI 

50600 REX fleld variablen in stringvariablen 
50610 txt»(0 >=prnu*:txt* <1)=genu*:txt* (2 > =adr$:txt 
*(3)=prgu*:txt*(4>=wana*:txt*(5>=wanu* 

50620 txt*(6>=voge*:txt*(7>=lgng#.‘txt* (8)=ning*: tx 
t*(9)=prei»:txt*(10)=nerk* 

50625 txt*(ll>=staf* 

50630 RETURI 

50700 REX txt* in field 

50710 LSET prnu*=txt*(0):LSET genu*=txt*<1>:LSET a 
dr*=txt*(2):LSET prgu*=txt*(3) 

50720 LSET wana*=txt*(4):LSET wanu$=txt*(5>:LSET v 
oge*=txt*(6):LSET lgi^*=txt*<7> 

50730 LSET mimg»=txt* <8):LSET prei*=txt*(9>:LSET n 
erk*=txt* (10):LSET staf*=txt*(11) 

50740 RETURI 

50800 REX lösche txt» variablen 

50805 FDR 1*0 TD 11:txt*(i)=SPACE»(s<i>-16>:IEXT i 
50810 RETURI 

51000 REX schlüsselauswahl 
51005 GOSUB 50400 

51010 z=10:s=29:GOSUB 50100:PRIIT inv*" Suchen nac 
h: * 

51030 z=12;s=29:GOSUB 50100:PRIIT " Warenname- 

... 1 " 

51040 z=14:GOSUB 50100:PRIIT " Warennummer.2 


<8ß> 51050 z=16:GOSUB 50100:PRIIT " Alle Waran (*> .. 3 

H 

<83> 51060 IF ex=0 THEI z=18:GOSUB 50100:PRIIT " Kunden 
kartei. EITER " 

< 0> 51075 z=20: GOSUB 50100: PRIIT " Xenü. EXIT 


<55> 

<15> 

<18> 

<65> 


<72> 
<67> 
<82 > 


<35> 
<59 > 
<54> 
<28> 
<31> 
<78 > 
<37> 
<94> 
<37> 
<89> 
< 21 > 
< 88 > 

<60> 

<46> 

<35> 

<75> 
<51> 
<62> 
<24> 
<35> 
<53 > 
<17> 
<81> 
< 12 > 
<33> 
<98> 
<36> 


51080 z=24:GOSUB 50100:PRIIT " Ihre Wahl: _";nrn*; 
lft*; 

51090 a*=IIKEYS: IF <a*<"l" OR a»>”3") AID aSOesc* 
AID a*OCHR»(13> THBI 51090 
51095 IF a*=esc* THEI re*=B:RETURI 

51097 IF a»=CHR*(13> AID ex=0 THEI CLOSE l:CLOSE:z 
=22:s=30:GOSUB 50100:PRIET inv*" BITTE WARTE! !! " 
nrm*:CHAII"n:kuka",900 

51098 IF a*=CHR*(13) THBI 51090 
51100 PRIIT inv»;a*;nrmS 

51110 z=29:e=29:GOSUB 50100:PRIIT inv*" Suchbegrif 
f: ";:IIPUT sch*:PRIIT nrm»;: IF sch*=""THBI 510 
05 

51120 ret=VAL(a*>-l 
51130 RETURI 

52000 REX suchen mit metacharacter 

52010 REX erlaubt ist der « als abkürzungszeichen 

52020 erg=SEEKRAim,0,re*> 

52030 IF ergOO THEI RBTURI 
52040 GET 1 

52050 l*neta-l:sch*=LEFT4(sch»,1) 

52060 a»=FETCHKEY»(1) 

52070 IF sch»=LEFT»(a»,1) THBI erg=0:RETURI 
52080 erg=SEEKIEXT(1,0) 

52090 IF erg=0 OR erg=101 THEI 52040 ELSE erg=l:RB 
TURI 

52100 REX auswahl mit Cursor bei produktgruppe 
52105 flag*l 

52120 IF meta=0 THBI sch*=sch*+SPACE*(l(reÄ)-LBI(s 
ch*)) 

52122 IF metaOO THEI GOSUB 52000:GOTO 52130 
52124 erg=SBEKKEY(l,0,re*,sch») 

52126 GET 1 
52130 FOR i=0 TO 14 

52140 IF ergOO THEI f lag=0: i*i-l: GOTO 52200 

52150 GOSUB 50600:GOSUB 52500 

52160 ex=2: GOSUB 53800:ex=0 

52190 IEXT i:flag=l 

52200 IF i<0 THEI 52240 

52203 IF flag=0 THBI k=i ELSE k=14 

52205 GOSUB 50400 

52207 z=9:s=0:GOSUB 50100:PRIIT inv*" Produktgrupp 
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e. Varenname. Varennr. Vo 


<66> 53311 LPRIKT "Gebindenummer:"TAB(20)txt*(1) 

1/Gew. . Lagerbestand. "nrm* 


<61> 53312 LPRIKT "ADR:"TAB(20)txt*(2) 

<0O> 52208 GOSUB 61000 


<13> 53313 LPRIKT "Produktgruppe:"TAB(20)txt*(3) 

<75> 52210 FOR 1=0 TO k 


<86> 53314 LPRIKT "Varenname:"TAB(20)txt*<4) 

<91> 52220 2=1+11:s=l;GOSUB 50100:FOR J=0 TO 5: PRIKT bf 


< 4> 53315 LPRIKT "Varennummer:"TAB(20)txt*(5) 

1 (i,J)" "; :KEXT J 


<38> 53316 LPRIKT "Valumen/Gewicht:"TAB(20)txt*(6) 

<34> 52230 IEXT i 


<40> 53317 LPRIKT "Lagertmange:"TAB(20)txt*(7) 

<77> 52231 PRIST esc*+-"u" 


<66> 53318 LPRIKT "Mindestmenge:"TAB(20)txt*(8> 

< 2> 52240 IF flag=0 THEK z=29:6=20:GOSUB 50100;PRIKT e 


<71> 53320 LPRIKT "Merkblattnummer:*TAB(20)txt*(10) 

cl*'* Cursor "inv*" auf/ab "nrm*". Auswahlen "inv*" 


<83> 53325 LPRIKT:LPRIKT:LPRIKT:LPRIKT:LPRIKT 

EKTBR "nrm*". Menü "invS" EXIT "nrm* 


<69> 53330 RETURH 

<98> 52245 IF flag=l THES z=29:s=10:GOSUB 50100:PRIKT e 


<15> 53400 REM löschen 

cl*" Cursor "invS" auf/ab "nrm*". Auswählen "lnv$" 


< 9> 53410 z=29;s=0:GOSUB 50100:PRIKT inv*;:IKPUT "- 

EKTBR "nrm*". Inhalt weiter "lnv* M P+T"nrm*". Me 


. Sind Sie sicher (J/K).. 

nü "inv*" EXIT “nrn$ 


. ",a*:PRINT nrm*; : I 

<57> 52247 z=ll:s=20 


F a*<>"J" THEK RETURK 

<84> 52248 GOSUB 50100 


<54> 53420 z=29:s=26:GOSUB 50100:PRIKT ecl*;inv*" Eintr 

<25> 52250 a*=IKKEY$:IF a*="" THEK 52250 


agung. wird.. gelöscht !! "nrm* 

<25> 52260 IF a*=esc* THEK CLOSE 1:G0T0 2000 


<22> 53430 sn%=FETCHREC(1) 

<48> 52270 IF a*=CHR»<22) THEK IF flag=l THEK 52130 


<47> 53435 IF sn%=0 THEK RETURK 

<59> 52272 IF a»=CHR*<31> THEK z=z-l:IF z<ll THEK z=ll; 


<64> 53440 erg=DELKEY(l,0,0,wanaS,sn%) 

GOTO 52248 


<36> 53450 erg=DELKEY(1,0,1,wanu*,sn%) 

<12> 52274 IF a*=CHRS(30> THEK z=z+l:IF z>ll+k THEK z=l 


<38> 53460 erg=DELKEY(1,0,2,prgu*,sn%) 

1+k:GOTO 52248 


< 5> 53470 erg=C0KS0LIDATE <1) 

<10> 52276 IF a*=CHR*(13) THEK l=z-ll:sch*=bf*(i,2):re% 


<92> 53480 RETURK 

=1:flag=0:GOTO 2107 


<86> 53500 REM datensatz speichern 

<25> 52280 GOTO 52248 


<74> 53510 z=29:s=26:GOSUB 50100:PRIHT ecl*;inv*" Daten 

<42> 53499 CLOSE l:GOTO 2000 


satz wird, gespeichert tt ";nrm* 

<12> 52500 REM copy txt* in bf* 


<38> 53520 GOSUB 50700 

<72> 52510 FOR j=0 TO 4:bf*(i,j >=txt*(j+3>:HEXT j 


<17> 53530 erg=ADDREC(l,2,0,wana*) 

<65> 52520 bf$(l,5)=txt*(9) 


<29> 53540 sn«=FETCHREC(l) 

<73> 52530 RETURK 


<88> 53550 erg=ADDKEY(l, 0,1, wanu*, sn‘4) 

<62> 53000 HEM ausgabemaske mit Cursorsteuerung und änd 


<90> 53560 erg=ADDKEY(1,0,2,prgu*,sn%) 

erungsteil 


< 8> 53570 erg=COHSQLIDATE(1) 

<30> 53005 uber*=" Einträge bearbeiten " 


<95> 53580 RETURK 

<96> 53010 REM 


<30> 53600 REX datensatz ändern 

<77> 53020 GOSUB 50400 


<49> 53607 z=29:s=2:GOSUB 50100:PR1KT ecl*"Edit: "InvS" 

<72> 53030 z=13:s=l:GOSUB 50100:PRIHT "Produktnummer:"T 


auf/ab/links/rechts. DEL "CHR*(252) H . DEL "CHR*<2 

AB(20)txt$(0) 


53)nrm* ".. Abspeichern "inv*" EKTER "nrm**. Abbre 

<35> 53040 z=14: PRIKT " Gebindenummer: "TABUS)txt* (1) 


eben "inv*" EXIT "nrm* 

<19> 53050 z=16:PRIKT " ADR. :"TAB(18)txt*(2) 


<9Q> 53609 PRIKT esc*+"v"; 

<23> 53060 *=18:PRIKT H Produktgruppe:"TAB(18>txt*<3> 


<46> 53610 z=13:s=17:ind=0 

< 3> 53070 z=20:PRIKT inv*" Varenname... :"TAB(19)txt*( 


<50> 53620 GOSUB 50100 

4)nrm* 


<28> 53630 a*=IIKBYS:IF a*="" THEK 53630 

<12> 53080 z=22:PRIKT inv*" Varennummer. :"TAB(19)txt*( 


<40> 53633 IF a*>=" " AID a*<="ß" THEK 53700 

5)nrm* 


<?4> 53634 IF a*=CHR*(7) 0R a*=CHR*(127) THEK 53670 

<19> 53090 z=24:PRIKT " Vol./Gew- :"TAB(18)txt*<6) 


<95> 53635 IF a*=CHR*<13> THEK 53750 

<35> 53092. PRIKT inv*" Lagermenge., :"TAB(19)txt*( 


<61> 53640 IF a*=CHRS(27) THEK GOSUB 50600:RETURH 

7)nrm* 


<23> 53642 IF a*=CHRS<31> THEK IF z=25 THEK z=z~2:s=17: 

<89> 53094 PRIKT inv*" Mindestmenge :"TAB(19)txt*(8>nrm 


ind=ind-l ELSE IF z>13 THEK z=z-l:ind=ind-l:s=17 E 

S 


LSE s=17:z=24:ind=ll 

< 7> 53095 PRIKT 


< 6> 53644 IF a*=CHR*<30) THEK IF z<24 THEK z=z+l;ind=i 

<70> 53098 PRIKT " Merkblatt:"TAB(18)txt*(10) 


nd+1:s=17 ELSE z=13:s=17:ind=0 

<?7> 53110 IF ex=0 THEK z=29:s=0:GOSUB 50100:PRIKT "Vel 


<94> 53646 IF z=24 ARD a*=CHR*(6) THEK 53660 ELSE IF z= 

ter "inv*" EHTER "nrm*" Zuwa."inv*" F+T"nrm*" Abb 


25 THEK 53664 

u."invS" P-r*nrm*". andern "inv*" Fl "nrm*" Lösch 


<46> 53647 IF a*=CHRS(l) THEK IF s>17 THEK s=s-l 

en "inv** F3 "nrm*" Ausdruck "inv*" F8 "nrm*" Menü 


<64> 53648 IF a*=CHRS<6) THEK IF s<s(ind) THEK s=s+l 

"inv*" EXIT "nrm* 


<19> 53650 IF s>s(ind) THEK s=s(ind) 

<21> 53111 IF ex=l THEK GOSUB 53600:RETURH 


<87> 53652 IF s<17 THEK s=17 

<88> 53120 a*=IKKEY*:IF a*<CHR*(13> OR a*>CHR*(28) THEK 


<77> 53658 GOTO 53620 

53120 


<36> 53660 IF s<89 THEK s=s+l ELSE s=0:z=z+l 

<65> 53130 IF a*=esc* THEK RETURH 


<51> 53662 GOTO 53620 

<58> 53140 IF a*=CHR*(16) THEK GOSUB 53200:GOTO 53000 


<90> 53664 IF a*=CHR*<6> THEK IF s<89 THEK s=s+l 

<52> 53150 IF a*=CHR*(17) THEK GOSUB 53400:GOTO 53000 


<97> 53686 IF a»=CHR*(l) THEK IF s>0 THEK s=s-l ELSE e= 

<26> 53160 IF a*=CHR*<26) THEK GOSUB 53600:GOTO 53000 


89:z=24 

<25> 53170 IF a*=CHRS(13) THEK GOSUB 53800:GOTO 53000 


<45> 53669 REX deletetasten 

<23> 53175 IF a*=CHR*(28) OR a*=CHR*<22) THEK GOSUB 540 


<16> 53670 IF a*=CHR*(127) AKD z<25 AKD s>17 THEK txt*< 

00 


ind)=LEFT»(txt*(ind),s-18)+RIGHT*(txt*Und),s(ind) 

<19> 53180 GOTO 53000 


-s+l)+* •:8=8-1:GOSUB 53790:GOTO 53620 

<14> 53200 REM ausdruck eines eintrages 


<41> 53680 IF a*=CHRS(7) AKD s<s(ind) AKD z<25 THEK txt 

<18> 53210 uber*=" Ausdrucken einer Eintragung " 


*(ind)=LEFT*(txt*(ind),s-17)+EIGHTS(txt*(ind),s(in 

<83> 53220 GOSÜB 50400 


d)-s)+" ":GOSUB 53790:GOTO 53620 

<98> 53230 z=12:s=25:GOSUB 50100;PRIKT inv*" Auflistung 


<32> 53685 IF a*=CHRS(7) AKD z=25 THEK txt*(ind)=LEFT*( 

der Daten.. . EKTER" 


txt*(ind),73+s)+RIGHT»(txt*(ind),s(ind)-s-90)+" ": 

<65> 53250 z=20:GOSUB 50100:PRIKT " Rückkehr Bearbeitun 


GOSUB 53790:GOTO 53620 

g ... EXIT"nrm* 


<21> 53690 IF a*=CHR*(127) AKD z=25 THEK txt*(ind)=LEFT 

<32> 53260 a*=IHKEY*:IF a*<CHR*<13) 0R a*>esc* THEK 532 


»(txt*(ind),72+s)+RIGHT*(txt*(ind),s(ind>-s-89)+" 

60 


":GOSUB 53790:a*=CHR*(1>:GOTO 53666 

<22> 53265 IF ex=l THEK RETURH 


<78> 53695 GOTO 53620 

<84> 53270 IF a*=esc* THEK RETURH 


<45> 53699 RBM insertmodus 

<30> 53280 IF a*=CHR*(13) THEK 53300 ELSE 53260 


< 5> 53700 IF z<25 THEK txt*(ind)=LEFT*(txt*(ind),s-17) 

<25> 53300 REM ausdrucken 


+a*+RIGHT*(txt*(ind),s(ind)-s+l):txt*(ind)=LEFT*(t 

<91> 53310 LPRIKT "Produktnummer:"TAB(20)txt*(0) 


xt*(ind),s(ind)-16>:GOSUB 53790:a*=CHR*(6):GOTO 53 
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<94> 53710 IF z=25 THEH txt*(ind)=LEFT*(txt*(ind),73+s) 
+a*+RIGHT* (txt*(lud),B(lnd)-a-69):txt*(ind)=LEFTS( 
txt*(ind),s(ind)-16):GOSUB 53790:a*=CHRS(6):GOTO 5 
3664 

<28> 53720 GOTO 53620 

<32> 53730 ES* ändern ende 

<70> 53750 GOSUB 53430: GOSUB 53500: RETURH 

<52> 53780 GOTO 53620 

<93> 53790 SVAP s,ss:SVAP z,zz:s=17:z-13+ind:PRIHT:GOSU 
B 50100:PRIHT txt*(ind):SWAP ss,s:SVAP zz,z:RETURH 
<35> 53800 REX nächsten datensatz lesen 
<23> 53820 erg=SEEKHEXT(l,0) 

<24> 53825 IF metaOO THEH 53900 

< 0> 53830 IF ergOO THBH GOSUB 50500: RETURI 
<63> 53840 GET 1 

<44> 53850 GOSUB 50600 
<96> 53860 RETURS 

<13> 53900 REX suchen mit metachar 

<97> 53910 IF ergOO AHD ergOlOl THES GOSUB 50500: RETU 
RH 

<37> 53920 GOSUB 52040 

< 3> 53930 IF ergOO THEH GOSUB 50500: RETURE 
<43> 53940 GOSUB 50600 

<95> 53950 RETURH 
<57> 53999 RETURH 

<66> 54000 REX abbuchen mit mlndestaengenausdruck 
<71> 54010 IF a*=CHRS(28) THEI uber»=" Abbuchen ":ab=l 
ELSE uber*=" Zuwachs ":ab=-l 
<79> 54020 GOSUB 50400 

<52> 54030 z=10:s=l;GOSUB 50100:PRIHT " Varennane: "TAB 
(20)txt*(4) 

<19> 54040 z=ll:GOSUB 50100:PRIXT " Warennummer: "TAB(2 
0>txtS(5> 

<65> 54050 z=12:GOSUB 50100:PRIXT " Val./Gew. :"TAB<20) 
txt*(6) 

<57> 54060 z=13:GOSUB 50100:PRIXT inv*" Lagermenge:"TAB 
(28)txt*(7>nmr* 

<34> 54065 z=14: GOSUB 50100:PRIXT inv®" Xlndestmenge:"T 
AB(28)txt®(8)nrm® 

<89> 54077 IF VAL(txt®(7))<=VAL(txt®(8)) THEH nb=l ELSE 
nb=0 

<16> 54080 z=20:s-l:GOSUB 50100:PRIIT ecl*;:ISPUT "Stüc 

kzahl:. ",stz 

<22> 54085 IF ab<0 THEH 54175 

<88> 54090 IF stz>VAL(txt®(7)) THEH GOSUB 54500:IF a»=e 
sc* THEH RETURH ELSE 54080 

<89> 54100 z=29:s=28:GOSUB 50100:PRIHT ecl*" Bitte die 
Taste "inv*" Fl "nrm®" drücken " 

<82> 54110 a*=IHKEY*:IF aSOCHRS(26). THEH 54110 

< 5> 54120 IF a®=CHRS(26) THEH GOSUB 54400:GOTO 54150 
<41> 54140 IF skt>VAL(txt®(9)) THEH GOSUB 54500:IF a*=e 

sc* THEH RETURH ELSE 54130 

<85> 54150 stp=VAL(txt*(9))-skt:sum=stp*stz:rest=VAL(tx 
t*(7))-stz 

<41> 54170 z=24:s=0:GOSUB 50100:PRIHT inv*" Restlagerme 
nge:.. *;rest nrm®:GOTO 54180 
<78> 54175 rest=VAL(txt*(7))+stz 

<81> 54180 z=29:s=23:GOSUB 50100:PRIHT ecl*".. Buchen " 
InvS" EITER "nrm*". Abbrechen "inv*" EXIT "nrm® 
<20> 54190 a*=IHKBY*:IF a*<>CHRS(13> AID a*Oesc* THEH 
54190 

<58> 54200 IF a*=esc* THBH RETURH 

<52> 54210 txt*(7)=LEFT*(RIGHTS(STR*(rest),LEH(STR*(res 
t))-l)+"... ",4) 

<44> 54215 IF ab<0 THEH 53750 

<49> 54220 IF rest<=VAL(txt*(8)> AID nb=0 THEH GOSUB 54 
600 

<55> 54230 GOTO 53750:LPRIHT:LPRIXT: 

<72> 54240 LPRIHT "Abbuchung:" 

<23> 54243 LPRIHT 

<80> 54245 LPRIHT "Pradn Gb ADR. Praduktgruppe. 

..... Warenname. Warenno. Stück" 

<38> 54246 LPRIHT 

<94> 54250 LPRIHT txtS(0) B "txtS(l>" "txt*(2)" H txtS(3) 
" "txt*(4)" "txt*(5)" "DEC*(stz,"####") 

<37> 54255 LPRIHT 

<?4> 54260 LPRIHT Stückpreis.... Summe" 

<31> 54263 LPRIHT 

<52> 54265 LPRIHT USIHG* ##########. ############";stp: 
sum 

<56> 54270 LPRIHT:LPRIHT:LPRIHT:LPRIHT 

<68> 54275 REX abspeichern des geänderten Datensatzes 


<98> 54280 GOTO 53750 

<16> 54400 REK Staffel aus txt* suchen 

<88> 54410 skt-0:sl=l 

<20> 54420 st*=" "+txt*(ll> 

<70> 54430 bll=IHSTR(sl,st*," ">:sl=IBSTR(sl,st®,"/*) 
<91> 54440 IF sl=0 THEH RETURH 

<82> 54445 bl2=IHSTR(sl,st*," "):sll=IXSTR(sl+l,st$, H /" 
) 

<49> 54450 stzl=VAL(XID* (st®, bll,sl-bll>): IF sllOO THE 
I stz2=VAL(XID*(st®,bl2,sll-bl2)) 

<14> 54460 IF stz>=stzl THEH skt=VAL(XID*(st*,sl+l,bl2- 
sl >) 

<46> 54470 IF stz<stz2 OR sll=0 THEI RETURH ELSE sl=sl+ 
1:GOTO 54430 

< 5> 54500 REX Überlaufmeldung mit f-tasten abfrage 
<46> 54510 z=29:s=20:GOSUB 50100:PRIHT inv*" Unmögliche 
r Wert ! "nrm*" Hachmal "inv®" Fl "nrmS“. Abbruch 
"inv*" HXIT "nrm* 

<56> 54520 a*=IIKEY$: IF aSOCHRS<26> AHD a*Oesc* THEH 
54520 

<77> 54530 RETURH 

<89> 54600 REX bestellung ausgeben 

<77> 54610 LPRIHT:LPRIHT: LPRIHT 

<53> 54620 LPRIHT "Bestellausdruck vom: ";date® 

<89> 54625 LPRIHT "================================■ 

<94> 54630 LPRIHT "Prodn Gb.. ADR.. Produktgruppe. 

Warenname. Warennummer " 

<41> 54633 LPRIHT ... 


<05> 54635 LPRIHT txt*(0>" "txt*(l)‘.. "txt*(2>" "txt*( 
3)* "txt*(4>" "txt*(5) 

<56> 54638 LPRIHT 

<78> 54640 LPRIXT " Volumn/Gewicht. Xerkblatt. " 

<45> 54643 LPRIXT . . . . . .. 


<34> 54645 LPRIXT. txt*(6). ". "txt*(10)".. "txt*< 

9). 

<55> 54647 LPRIXT 

<75> 54648 z=25:s=1:GOSUB 50100 

<74> 54649 PRIXT inv*:IXPUT " Zu bestellende Stückzahl 
:.. ", stz. 

<53> 54650 LPRIXT "Lagermenge. Xindestmenge best.Stück" 
<67> 54653 LPRIXT "===================================" 

<33> 54655 LPRIXT. "txt*(7)". "txt*(8)". 

"stz 

<56> 54660 LPRIHT "===================================" 

<62> 54700 REX bestellung auf bestelldatei schreiben 
<68> 54710 0X ERROR GOTO 54790 
<86> 54720 KILL "a:Bestell" 

<22> 54730 IAHE "a:Bestell" AS "ailakatemp" 

<47> 54740 OX ERROR GOTO 0 
<89> 54750 QPEX "o",#2,*a:LAF" 

<69> 54760 OPEX "i",#3,"a:lakatemp" 

<92> 54770 VHILB XOT E0F(3):LIXE IXPUT #3,in*:PRIXT #2, 
in*:VEXD 

<62> 54772 CLOSE 3 

<40> 54781 PRIXT #2,"Xachbestellung für:" 

<76> 54782 PRIXT #2,"Produkt Xa.:"TAB(20)txt*(0) 

<32> 54783 PRIXT #2,"Gebinde Xa.:"TAB(20)txt*(1) 

<10> 54784 PRIXT #2,"ADR:"TAB(20)txt*(2) 

<24> 54785 PRIXT #2,"Produktguppe:"TAB(20)txt*(3) 

<75> 54786 PRIXT #2,"Warenname:"TAB(20)txt*(4) 

< 6> 54787 PRIXT #2,"Waren Xo.:"TAB(20)txt*(5) 

<52> 54788 PRIXT #2,"Volumen/Gewicht:"TAB(20)txt*(6):PR 
IXT #2,"Stück:"TAB(20)stz 

< 4> 54789 CLOSE 2:RETURH 
<67> 54790 RESUKE XEXT 
<59> 54999 RETURH 

<88> 59000 REX datum hglen 

<78> 59010 OPEX "i",#1,"m: datum, lib* 

<37> 59020 IHPUT #1, tag*,mon*,Jahr* 

< 1> 59025 date*=tag*+"."+mon*+"."+J ahr* 

<98> 59030 CLOSE 1 

<76> 59040 RETURH 

<54> 59100 OPEX "i",#1,"m:passwd.lib" 

<88> 59110 VHILB XOT EOF(l) 

<27> 59120 IXPUT #1,n»,passwd*,d* 

<24> 59130 IF passwd*=pw* AXD name*=n* THEH 59160 
<32> 59140 VEXD 
<54> 59150 pw#="" 

<14> 59160 CLOSE 1 
<87> 59170. RETURH 

<41> 59200 REX indexsequentielle datei öffnen 
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<38> 59210 OPEI "K",1,"a:lakadat“,"a:lakaind",2,satz% 
<32> 59220 FIELD 1,5 AS prnuS,2 AS genuS,4 AS adr$,20 A 
S prgu*,30 AS wana*,8 AS wanu*,10 AS voge*,4 AS lg 
mg*, 4 AS aimgS, 10 AS prei*,8 AS merk*,163 AS staf* 
<78> 59230 RETURH 
<51> 60000 PRIHT"error "erg 
<73> 60010 CLOSB 1 

<57> 61000 s=0:PRIHT esc*+"p":PRIHT esc*+"r" 

<51> 61200 RETURH 


Listing 3: Die Kundenkartei 


LISTIIG >KUKA<, REMARK = >rem<. 

<71> 1 VIDTH 255 

< 2> 2 COHHOH date* 

<22> 5 CLEAR ,,,,512 
<97> 6 satzl=316 

<66> 20 REM geschrieben van Graman Engelbert 4020 Linz 
<35> 25 REM. Schneider Joyce alt 368k ran, 1 floppy 180 
k und 1 floppy 720k 
<46> 30 BUFFERS 24 
<42> 40 RBM escapes definieren 
<21> 50 GOSUB 50000 
<56> 60 REM datum holen 
<23> 70 GOSUB 59000 
<14> 75 pt=l 

<41> 80 REK schirm aufbauen 
<78> 85 uber*=" Programm Login " 

<73> 90 GOSUB 50400 
<60> 100 REM passwort 

<91> 115 z=20:s=10:GOSUB 50100:PRIHT inv*" Ihr Harne: 

:IIPUT "".nameS:PRIHT nrm*; 

<39> 117 IF name*=""THEH pw*="":GQTO 200 
<66> 120 z=25:s=10:GOSUB 50100:PRIHT inv*" Passwort; "n 
rmS; 

<63> 125 GOSUB 50300:pw*=txt* 

<60> 140 REM passwart suchen 
<94> 150 GOSUB 59100 

<58> 160 IF pw*<>"" THEH pw*="ok": GOTO 200 

<75> 170 REM passwartcheck ende 

<27> 175 IF pt>3 THEH PRIHT"chain menü":EHD 

< 8> 180 z=25:s=10:GOSUB 50100:PRIHT inv*" Passwort nie 

ht gefunden - bitte wiederholen ..."nrm*: pt=pt+l 

< 3> 185 F0R i=l TO 2000: HEXT i 

< 9> 190 GOTO 90 

< 6> 200 REM menü 

<25> 210 über*®" Kundenkartei - Menü “ 

<20> 220 GOSUB 50400 

<59> 230 z=10:s=24: GOSUB 50100:PRIHT inv*" Einträge bea 
rbeiten. 1 * 

<14> 240 z=12:GOSUB 50100:PRIHT inv*" Einträge ausdruck 
en.2 " 

<16> 250 z=14:GOSUB 50100:PRIHT inv$ H Heuer Eintrag_ 

. 3 B 

<27> 260 z=16:GOSUB 50100:PRIHT inv*“ Vertreterstatisti 
k.4 * 

<75> 265 z=18:GOSUB 50100:PRIHT inv$ M Heue Datei anlege 
n.. . . . ... 5 " 

<32> 270 z=20:GOSUB 50100:PRIHT inv*" Zurück ins Hauptn 
enü ... EXIT " ; nrm* 

<80> 280 z=24:GOSUB 50100:PRIHT inv*" Ihre Vahl: _";nrm 
*;lft*; 

<90> 290 a*=IHKEY*: IF <a*< ,, l" OR a*>"5"> AHD a*OCHR*(2 
7) THEH 290 

<59> 300 IF a*=CHRS <27) THEH VIDTH 89:z=22:s=24:GOSUB 5 
0100:PRIHT inv*” BITTE VARTBH !! "nrm*:CHAIH "m:ae 
nü",150 

<80> 305 PRIHT inv*;a*;nrm*; 

<88> 310 a=VAL<aS):. 01 a GOTO 1000,3000,4000,5000,500 

<96> 320 GOTO 280 

<27> 500 REM neue datei 

<50> 510 uber*=" Heue Datei anlegen " 

<23> 520 GOSUB 50400 

<11> 530 z®10:s=24:GOSUB 50100:PRIHT inv*" Bitte eine f 
ormatierte Disk in Laufwerk B einlegen ! " 

<57> 540 z=12:GOSUB 50100:PRIHT " Dann RETURH für die E 
inrichtung der neuen Datei... ! " 

<30> 550 z=14:GOSUB 50100:PRIHT " Oder EXIT zum Verlass 

en dieses Programmteiles. ! "nrm* 

<14> 560 a*=IHKEY*: IF a*OCHR*<13> AHD aSOescS THEH 56 
0 


<55> 570 IF aSOCHR*(13) THEH GOTO 200 
<14> 580 z=20:s=16:GOSUB 50100:PRIHT inv*" Heue Datei w 
ird auf der Diskette errichtet ! " 

<18> 585 OH ERROR GOTO 700 

<14> 590 CREATE 1, "b: kukadat","b:kukalnd",2,satz% 

<49> 600 CLOSE 1 

<80> 605 OH ERROR GOTO 0 

< 9> 610 GOTO 200 

<32> 700 REM fehlerroutine 

<88> 701 IF ERR=5S THEH er*=" Datei schon vorhanden ! " 

< 4> 702 IF ERR=61 OR ERR=67 THEH er*=“ Diskette voll ! 

<88> 703 z=27:s=20:GOSUB 50100:PRIHT inv*” FEHLER :. ”e 
r*;nrm* 

<39> 710 z=29:s=2:GOSUB 50100:PRIHT inv*" Diskettenfehl 
er ist aufgetreten ! Bitte Fehler beheben dann RET 
URH ! " 

<32> 720 a*=IHKEY*:IF aSOCHR*<13) THEN 720 

<60> 730 RESUME HEXT 

<65> 900 REM entrypoint für chain 

<72> 910 GOSUB 50000 

< 0> 920 BUFFERS 24 

<46> 1000 REM einträge bearbeiten 
<24> 1010 uber*=" Einträge bearbeiten " 

<55> 2000 REM 

<35> 2030 REM maske für Schlüssel 
<82> 2040 GOSUB 51000 

< 2> 2050 IF re%>7 THEH 200 
<32> 2060 GOSUB 50400 

<16> 2070 z=15:s=32:GOSUB 50100:PRIHT inv**' Bitte Varte 
n “nrm* 

<28> 2080 meta=IHSTR<sch$,"*"> 

<31> 2090 GOSUB 59200 

<29> 2095 REM suchen mit metacharacter 

<68> 2100 IF rnetaOO THEH GOSUB 52000:GOTO 2120 

<55> 2105 REM suchen ohne metacharacter 

<73> 2107 sch*=sch*+SPACE*<1Cre%)-LEH(schS)) 

< 1> 2110 erg=SEEKKEY <1,0,re%,sch*) 

<56> 2115 GET 1 

<30> 2120 IF erg<> 0 THEH GOSUB 50500:GOTO 2145 

<53> 2130 GOSUB 50600 

<53> 2135 IF ex=l THEH 2150 

<11> 2140 GOSUB 53000 

<65> 2145 CLOSE 1 

<30> 2150 IF ex=l THEH RETURH ELSE 2000 

<70> 3000 REM ausdruck nach Schlüssel 

<13> 3010 über*®" Ausdruck nach Schlüssel ":ex=l 

<62> 3020 GOSUB 53220 

<81> 3030 IF a*®esc* THEH CLOSE l:ex=0:GOTO 200 
<21> 3040 IF a*=CHR*(17) THEH dr*="ett" ELSE dr*="" 

<62> 3041 GOSUB 2000 

< 4> 3042 IF ergOO THEH 3000 

<58> 3045 IF drt="ett" THEH GOSUB 53340 ELSE GOSUB 5330 
0 

<26> 3050 GOSUB 53800 

<38> 3060 IF ergOO AHD ergOlOl THEH 3000 ELSE 3045 

<34> 4000 REM neuer eintrag 

<40> 4010 uber*=" Heuer Eintrag " 

<18> 4020 ex=l:IF pw*<>"ok" THEH flag=l:pw*="ok" 

<32> 4025 GOSUB 59200 

< 4> 4027 REM txt* löschen 
<ßl> 4030 GOSUB 50800 
<94> 4035 REK uneatz = 0 
<74> 4037 txt*(7)="0" 

<37> 4040 REM schirmmaske 
<14> 4050 GOSUB 53000 

<34> 4055 ex=0:IF flag=l THEH flag=0:pw*="" 

<51> 4060 CLOSE 1 

<48> 4070 GOTO 200 

<11> 5000 REK Vertreterstatistik 

<13> 3005 IF pw*<>"ok" THEH z=29:s=24:GOSUB 50100:PRIHT 
inv*" Unerlaubtes Kommando !! RETURH für weiter ! 

"nrm*;:IHPUT "",a*:GOTO 200 
<25> 5010 über*®“ Vertreterstatistik ":GOSUB 50400 
<69> 5011 z=15:s=25:GOSUB 50100:PRIHT inv*“ Ausgabe am 
Schirm.Fl " 

< 7> 5012 z=17;s=25:GOSUB 50100:PRIHT" Ausgabe am Druck 

er.F3 " 

<12> 5013 z=21:s=25:GOSUB 50100:PRIHT" Menü. 

. EXIT " 

<70> 5014 z=24:s=25:GOSUB 50100:PRIHT " Ihre Vahl: _"nr 

mS; 

<52> 5015 a*=IHKEY*:IF a*="" THEH 5015 
<15> 5016 IF a*=esc* THEH 200 

< 8> 5017 IF a*=CHR* <17) THEH pr*="Ja":GOTO 5020 

< 6> 5018 IF a*=CHR*(26> THEH pr*="nein":GOTO 5020 
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<63> 5019 GOTO 5015 


<72> 50630 RETURI 

<23> 5020 GOSUB 50400 


<80> 50700 REM txt* in field 

<63> 5030 REM datei aufmachen 


<77> 50710 LSET knum*=txts(0):LSET knam*=txt»(1):LSET b 

<19> 5040 GOSUB 59200 


etr*=txt*(2):LSET stra»=txt*(3) 

<68> 5050 erg=SEEKRAIK(1,0,5) 


<29> 50720 LSET ort*=txt*(4):LSET tele*=txt*(5):LSET ve 

<92> 5060 IF ergOO THEI GOSUB 50500: CLOSE l:GOTO 200 


rt*=txt»(6):LSET ums*=txt*(7) 

<26> 5070 vertr»=FETCHKEY» <1> 


<84> 50730 LSET verb*=txt»(8) 

<74> 5073 erg=0 


<30> 50739 LSET verb*=txt*(8) 

<41> 5075 ums=0 


<79> 50740 RETURI 

<23> 5080 VHILE erg=0 


<27> 50800 REM lösche txt* variablen 

<61> 5090 GET 1 


<18> 50805 FOR i=0 TO 8:txt»(i>=SPACE*(s(i)-16):HEXT i 

< 2> 5100 uns=UJns+VALCunGS> 


<70> 50810 RETURI 

<86> 5110 erg=SEEKIEXT(1,0) 


<71> 51000 REM schlüsselauswahl 

<23> 5120 VESD 


<90> 51005 GOSUB 50400 

<58> 5145 IF vertr*=SPACES(15) THES vertr*=*Sonstige" 


< 6> 51010 z=10:s=29:GOSUB 50100:FRIIT inv*" Suchen nac 

<63> 5147 IF pr*="Ja" THES LPRIIT "Vertreter:“TAB(20)ve 


h: " 

rtrSTAB(40)* Umsatz: "TAB(50)DEC*(ums,"############ 


<22> 51020 z=12:s=29:GOSUB 50100:PRIIT " Kundennummer. 

")"kg":GOTO 5160 


.. . 1 " 

<?9> 5150 PRIST "Vertreter: "TAB<20)vertr*TAB(40)"Umsat 


<88> 51030 z= 14: GOSUB 50100: PRIIT " Kundennams.2 

z: "TAB(50)DEC*(ums,"##########") 


M 

<94> 5153 IF ums<0 THES ums=0 


<21> 51040 z=16:GOSUB 50100:PRIIT " Betriebsart.3 

<70> 5155 PRIIT invS;SPACE#(uas/100000! ); nrm* 


H 

<93> 5160 IF ergOlOl THES ex-1:GOSUB 50500:ex=0:CLOSE 


<83) 51050 *=18: GOSUB 50100: PRIIT "Ort. 4 

1:GOTO 200 ELSE 5070 


■i 

<89> 49998 CLOSE 1 


<69> 51060 z=20:GOSUB 50100:PRIIT " Telefonnummer .,.5 

<88> 49999 BSD 


•• 

<65> 50000 esc*=CHR»(27) 


<69> 51070 z=22:GOSUB 50100:PRIIT " Vertreter.6 

<53> 50005 RBM cls* Schirm löschen, harn* Cursor hone 


« 

<58> 50010 ham*=esc»+"H*: cls*=hom*+esc*+"E*+esc»+"v H 


<40> 51075 z~24: GOSUB 50100: PRIIT " Menü. EXIT 

< 0> 50015 REM inv» Invers ein.. . nrm* Invers aus 


u 

< 8> 50020 inv*=esc»+"p":nrm*=esc*+"q" 


<85 > 51080 z=27:GOSUB 50100:PRIIT " Ihre Wahl: ;nrm*; 

<47> 50025 REM und* Underline ein nun* Underline. aus 


lftS; 

<88> 50030 und*=escS+"r":nunS=esc*+"u" 


<44> 51090 a*=IIKEY»: IF (a*<"l H OR a*>"6") AID aSOesc* 

< 4> 50035 REM ecl*= erase Cursor line. lft*=cursor lef 


THEI 51090 

t 


<18> 51095 IF a*=esc* THEI re«=8:RETURI 

<34 > 50040 eclS=esc*+“1" : lft*=esc*+"D" 


<67> 51100 PRIIT inv»; a»; nrm* 

<51> 50045 REH rgt*= Cursor right. cup*=cursor up 


<82> 51110 z=29:s=29:GOSUB 50100:PRIIT inv*" Suchbegrif 

<42> 50050 rgt*=escS+"C*:cup*=escS+"A" 


f: ";: IIFUT "", sch#:PRIIT nrm»; : IF sch*=“"THEI 510 

<25> 50055 REM dwn*= Cursor down. . bel*= piepston 


05 

<45> 50080 dwn*=esc*+"B" : bel*=CHRS(7) 


<35> 51120 re*=VAL(a*)-l 

<49> 50065 REM dimensionierung der div felder 


<59> 51130 RETURI 

< 5> 50070 DIM z(20) , s(20) , 1(8) 


<54> 52000 REM suchen mit metacharacter 

<74> 50071 1(0)=8:1(1)=30:1(2)=15:1(3)=30:1(4>=16:1(5>= 


<28> 52010 REM erlaubt ist der » als abkürzungszeichen 

15 


<31> 52020 erg=SEEKRAIK <1,0,re% > 

<17> 50075 REM Wertzuweisungen an die felder 


<78> 52030 IF ergOO THEI RETURI 

<45> 50080 FOR 1=0 TO 8: READ s(i):IEXT i 


<37> 52040 GET 1 

<29> 50081 DATA 24,46,31,46.46,32,31,23,179 


<94> 52050 l=meta-l:sch*=LEFT*(sch*,1) 

<78> 50090 RETURI 


<37> 52060 a*=FETCHKEY»(l) 

<84> 50099 REM position Cursor 


<89> 52070 IF sch*=LEFT*(a*.1) THEI erg=0:RETURI 

<14> 50100 PRIIT esc*+“Y"+CHR*(z+32 ) +CHRS(s+32 >; 


<21> 52080 erg=SEEKIEXT(1,0) 

<49> 50110 RETURS 


<88> 52090 IF erg=0 OR erg=101 THEI 52040 ELSE erg=l:RE 

<70> 50200 REM titelzeile 


TURI 

<45> 50210 PRIIT:PRIIT cls*:s=l:FOR z=l T0 3:GOSUB 5010 


<62> 53000 REM ausgabemaske mit cursarsteuerung und änd 

0:PRIIT inv* ; SPACES(89);nrm*:IEXT z 


erungsteil 

<10> 50225 z=2:s=2:GOSUB 50100:PRIIT invS;LEFT*(txt*(1) 


<96> 53010 REM 

, IISTR(txt*(l)," ")) ; nrm* 


<77> 53020 GOSUB 50400 

<37> 50227 z=2:s=21:GOSUB 50100:PRIIT inv»" Kundenkarte 


< 5> 53030 z=13;s=l:GOSUB 50100:PRIIT " Kundennummer:"T 

i - KUKA - Version 1.1 " .dateS;nrm* 


AB(20)txtS<0) 

<60> 50230 RETURI 


<86> 53040 z=14:GOSUB 50100:PRIIT inv*" Kundenname. :"T 

< 2> 50300 REM hole text von der tastatur ohne schiraau 


AB(21)txt*(l)nrm* 

sgabe 


<22> 53050 z=15:GOSUB 50100:PRIIT " Betriebsart :"TAB<2 

<83> 50310 txt*="" 


0)txt*(2) 

<31> 50330 a*=IIKEY*: IF a*="" THEI 50330 


<77> 53060 *=16:GOSUB 50100: PRIIT " Straße . :"TAB(2 

<75> 50333 IF a$=CHR*(13) THBH RETURI 


0)txt*(3) 

< 7> 50335 PRIIT inv*"»"nrm*; 


<55> 53070 z=17:GOSUB 50100;PRIIT " Ort . :"TAB(2 

<20> 50340 txt*=txt*+a* 


0)txt*<4> 

<55> 50350 GOTO 50330 


<48> 53080 z=18:GOSUB 50100:PRIIT " Telefon - :“TAB(2 

<59 > 50400 REM Über* 


0)txtS<5> 

<49> 50410 GOSUB 50200 


<59> 53090 Z=19:GOSUB 50100:PRIIT lnv*" Vertreter.. :"T 

<70> 50420 z=7:s=39-LEI(über*>/2:GOSUB 50100:PRIIT inv* 


AB(21)txt*(6)nrm* 

; über*;nrm* 


<10> 53100 IF pw*="ok" THBI z=20:GOSUB 50100:PRIIT " Um 

<66> 50430 RETURI 


satz in kg: " TAB(20)txt*(7 ): z=21:s=0:GOSUB 50100:PR 

<61> 50500 REM fehler wenn kein weiterer eintrag mehr v 


IIT inv*" Sonstiges... :"TAB(22);esc*+"v"txt*(8)nr 

orhanden 


m* 

<69> 50505 IF ex=0 THEI z=29:s=10:GOSUB 50100:PRIIT ecl 


<21> 53110 IF ex=0 THEI z=29 : s=2 : GOSUB 50100:PRIIT " Ve 

*; invS" Eintrag in der Datei nicht gefunden ! RETU 


iter "inv*" EITER "nrm*". Ändern "inv** Fl "nrm*". 

RI für weiter ! ";nrmS; 


Löschen "inv*" F3 "nrm*". Ausdruck "inv*" F8 "nrm 

<80> 50507 IF ex=l THEI z=29:s=30:GOSUB 50100:PRIIT ecl 


*". LAKA "inv*" PtT"nrm*". Menü "inv*" EXIT "nrm* 

S;inv*" RETURI für weiter ! ";nrmS 


<21> 53111 IF ex=l THEI GOSUB 53600:RETURI 

<59> 50510 a*=IinCBY*: IF a*OCHR*(13) THEI 50510 


<56> 53120 a*=IIKEY*:IF a*<CHR*<13) 0R a#>esc* THEI 531 

<69> 50530 RETURI 


20 

< 4> 50800 REM field variablen in stringvariablen 


<65> 53130 IF a*=esc* THEI RETURI 

<53> 50610 txt»(0)=knumS:txt»(l)=knam$:txt*(2)=betrS:tx 


<58> 53140 IF a*=CHR*(16) THEI GOSUB 53200:GOTO 53000 

t*(3)=stra*:txt*(4)=ort* 

<52> 53150 IF a*=CHR*(17) THEI GOSUB 53400:GOTO 53000 

<24> 50620 txt»(5)=tele*:txt*(6)=vert*:txt*(7)=ums»:txt 

<26> 53160 IF a*=CHR*(26) THBI GOSUB 53600:GOTO 53000 

*(8)=verb» 

<79> 53170 IF a*=CHR*(13) THEI GOSUB 53800 


82 PC 2'87 













Dei Schneider PC ist ein IBM-kompatibler PC mit hervorragenden zusätzlichen Erwei¬ 
terungen. Ei wird als vollständiges System geliefert und hat in der Standard-Aus¬ 
führung die folgenden Kennzeichen: 



I 

/ * 1! 


A_.-1 




- 512 KB System mit allen Schaltkreisen auf einer einzigen 
Hauptplatine 8086 Prozessor mit 8 MHz getaktet. Der Haupt 
Speicher ist auf der Hauptplatine auf 640 KB erweiterbar. 

- Colour Grafik-Karte mit speziellem 16-Farb Hi-Res Modus 
-Drei nfull-size« kompatible Erweiterungsstecker Am Stan 

dardgerät steht ausreichend Strom zur Verfügung, um eine 
»hard-disk« und « Controller « zu versorgen. 

- Wahl zwischen einet oder zwei 360 KB SU "-Diskettenlauf¬ 
werke 

-Die Hauptplatme beinhaltet je eine serielle und parallele 
Schnittstelle mit Standard-Belegungen 

- Lautsprecher mit Lautstärkeregler 

- Batterie-yepuffertc Hardware-Uhr (real time clock) und Konfi¬ 
guration RAM 

• Sockel für 8087 nmathem. Co-Prozessoru 

- Komplett mit Färb- oder Monochrome-(Grey-Level) Monitor 

Der wahlweise mitgelieferte Farbmonitor beinhaltet fol¬ 
gende Möglichkeiten: 

Textmodus: mittlere Auflösung 16Farben, 40x25 Zeichen, 
hochauflösend 16Farben, 80x25Zeichen. 

Graphikmodus: Mittlere Auflösung drei 4-farb-PaleUen, 
320 <200Punkte: hochauflösend2- farbig. 6 40x200Punkte (Hi- 
Res Mode), speziell hochauflösend 16 Farben, 640x200Punkte. 
-Komplettes IBM-Standard-Tastenfeld, beleuchtete (Numlock) 
und (Capslock)-Tasten, Joystick-Anschluß. (Extra)-, (Del)-und 
(Enter)-Tasten. 

- 2-Tasten-Mouse (Microsoft-kompatibel) 

- IBM-PC-kompa tibles ROM BIOS 

- Umfangreiche mitgelieferte Software (4 Disketten) Microsoft 
MSDOS 3.2, Digital Research GEM, GEM Desktop, Digital Re¬ 
search GEM Pamt, Digital Research DOS PLUS, betreibt MS 
DOS und CP/M-86. GEM unterstützt Locomotive BASIC2 

■ Benutzer-Handbuch 








IBM ist oin registriertes Warenzeichen lur Internat innal Business 
Machines Corporation. Microsoft und MSDOS sa;d registrierte Waren¬ 
zeichen für Microsoft Corporation, DOS Plus, GEM. GEM Desktop, 
GEM PAINT sind Warenzeichen von Digital Research Ine., Locomotive 
BASIC 2 ist ein Warenz. -für Locomotive Software Ltd. 
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Professional Computing—i 


<82> 53175 IF a*=CHR*(22> THES CLOSE 1:CLOSE:2=27:s=30: 


<74> 53634 IF a*=CHRS(7> OR a*=CHRS(127) THES 53670 

GOSUB 50100: PRINT inv*" BITTE VARTEN 1! "nrm*:CHAI 


<95> 53635 IF a*=CHR*(13) THES 53750 

N"m:laka",900 


<61> 53640 IF a*=CHR®(27) THES GOSUB 50600:RETURS 

<19> 53180 GOTO 53000 


<23> 53642 IF a*=CHR*(31) THES IF z=25 THES z=z-2:s=17: 

<33> 53200 REM ausdruclc eines elntrages in ettiketten/r 


ind=ind-l ELSE IF z>13 THES z=z-l:ind=ind-l:s=17 E 

echnungsform oder als listing 


LSE s=17:z=24:ind=ll 

<18> 53210 uber»=" Ausdrucken einer Eintragung " 


< 6> 53644 IF a*=CHR*(30) THES IF z<24 THES z=z+l:ind=i 

<83> 53220 GOSUB 50400 


nd+1:s=17 ELSE z=13:s=17:lnd=0 

<80> 53230 z=12:s=25:GOSUB 50100:PRIST inv*" Auflistung 


<94> 53646 IF z=24 ASD a*=CHR*(6) THES 53660 ELSE IF z= 

der Daten . ... Fl " 


25 THES 53664 

<84> 53240 z=14:GOSUB 50100:PRIST " Ettikettenform. 


<46> 53647 IF a*=CHR*(l) THES IF s)17 THES s=s-l 

.F3 " 


<64> 53648 IF a*=CHR*(6) THES IF s<s(ind) THES s=s+l 

<65> 53250 z=20:GOSUB 50100:PRIST " Rückkehr Bearbeitun 


<19> 53650 IF s>s(ind> THES s=s(ind) 

g .. . EXIT"nrm* 


<87> 53652 IF s<17 THES s=17 

<49> 53260 a*=INKEYS:IF a*<CHRS(17) OR a*>esc* THES 532 


<77> Ü3658 GOTO 53620 

60 


<36> 53660 IF s<89 THES s=s+l ELSE S=0:z=z+1 

<22> 53265 IF ex=l THES RETURB 


<51> 53662 GOTO 53620 

<84> 53270 IF a*=esc* THES RETUR! 


<90> 53664 IF a*=CHRS(6) THES IF s<89 THES s=s+l 

<85> 53280 IF a*=CHRS(26) THES 53300 


<97> 53666 IF a*=CHR*(l) THES IF s>0 THES s=s-l ELSE s= 

<32> 53290 IF a*=CHR*(17) THES 53340 ELSE 53260 


89:z=24 

<62> 53300 LPRIIT:LPRIIT: LPRIST 


<45> 53669 REM deletetasten 

<60> 53310 LPRIST "Kundennuimner: "TAB(20)txt*(0) 


<85> 53670 IF a*=CRR*(127> ASD z<24 ASD s>17 THES txt*( 

<95> 53311 LPRIST "Kundennam:*TAB(20)txt*<l) 


ind)=LEFT$(txt*(ind),s-18> +RIGHT*(txt*(lnd), s(ind) 

<61> 53312 LPRIIT "Betrieb;*TAB(20)txt*(2) 


-s+l>+" ":s=s-l: GOSUB 53790:GOTO 53620 

<67> 53313 LPRIST "Straße:"TAB(20)txt*(3) 


<41> 53680 IF a*=CHR*(7) ASD s<s(ind> ASD z<25 THES txt 

<75> 53314 LPRIST "Qrt:"TAB(20>txt*(4) 


S (ind)=LEFTS (txt* (ind), s-17)+RIGHTS (txt*(ind),sdn 

<83> 53315 LPRIST "Telefon:"TAB(20)txt*(5) 


d)-s>+" ":GOSUB 53790:GOTO 53620 

<18> 53316 LPRIST "Vertreter:"TAB(20)txt*(6) 


<32> 53685 IF a*=CHR*(7) ASD z=25 THES txt*(ind)=LEFT*< 

<68> 53326 If pwä= M ok* TKEn LrRIST "Umsatz in kg:"TAB(2 


txt*(ind), 73+s)+RIGHT*(txt*(ind),s(ind)-s-90)+" ": 

0)txt*(?):LPRIST "Vereinbarungen:FOR 1=0 TO 3:L 


GOSUB 53790: GOTO 53620 

PRIST TAB(20>; MID*(txt*(8), 1+50*1,50): SEXT i 


<21> 53690 IF a*=CHRS(127) ASD z=25 THES txt*(ind)=LEFT 

<95> 53325 LPRIST:LPRIST:LPRIST 


*(txt*(ind),72+s)+RIGHT*(txt*(ind),s(ind)-s-89)+* 

<69> 53330 RETURS 


*:GOSUB 53790:a*=CHRS(l):GOTO 53666 

<78> 53340 LPRIST:LPRIST:LPRIST 


<78> 53695 GOTO 53620 

<87> 53350 IF LBFT*(txt*(2),2)=". " THES LPRIST "Herr/F 


<45> 53699 REM insertnodus 

rau* ELSE LPRIST "Firns" 


<91> 53700 IF z<24 THES txt*(ind)=LEFT*(txt*(ind),s-17) 

<84> 53360 LPRIST txt*(l> 


+a*+RIGHT*(txt*(ind),s(ind)-s+l):txt*(ind)=LEFTS(t 

< 8> 53370 LPRIST txt*(2) 


xt*(ind) ,s(ind)-16):GOSUB 53790:a*=CHR*(6):GOTO 53 

<52> 53375 LPRIST txt*(3) 


646 

<83> 53380 LPRIST esc*+"ml";esc*+"E";txt*(4); esc$+“F"es 


<94> 53710 IF z=25 THES txt*(ind)=LEFT*(txt*(ind).73+s) 

c*+"m0" 


+a*+RIGHT*(txt*(ind),s(Ind)-s-89):txt*(lnd)=LEFT*( 

<93> 53390 RETURS 


txt*(ind).s(ind)-16):GOSUB 53790:a*=CHR*(6):GOTO 5 

<15> 53400 REX löschen 


3664 

<30> 53405 IF pwSO"ck" THES z=28: s= 18:GOSUB 50100: PRIS 


<28> 53720 GOTO 53620 

T inv*" Unerlaubtes Kommando !! RETURS für weiter 


<32> 53730 REK ändern ende 

f "nrm*;:GOTO 50510 


<70> 53750 GOSUB 53430:GOSUB 53500:RETURS 

<73> 53410 z=28:s=28:GOSUB 50100:PRIST inv*;:INPUT " Si 


<52> 53780 GOTO 53620 

nd Sie sicher (J/S): ",aS:PRIST nrm*;:IF a$<>"J" T 


<93> 53790 SVAP s,sa:SVAP z,zz:s=17:z=13+ind:PRIST:GOSU 

HES RETURS 


B 50100:PRIST txt*(ind):SVAP ss,s:SVAP zz,z:RETURS 

<44> 53420 s=25:GOSUB 50100:PRIST ecl*;inv*" Eintragung 


<35> 53800 REM nächsten datensatz lesen 

wird gelöscht !! "nrm* 


<23> 53820 erg=SEEKSEXT(1,0) 

<45> 53430 erg=SEEKKEY(1,0,0,knum* 5 


<24> 53825 IF netaOO THES 53900 

< 3> 53432 IF ergOO THES RETURS 


< 0> 53830 IF ergOO THES GOSUB 50500: RETURS 

<37> 53433 sn%=FETCHREC(1) 


<63> 53840 GET 1 

<47> 53435 IF sn%=0 THES RETURS 


<44> 53850 GOSUB 50600 

<13> 53440 erg=DELKEY(l,0,0,knumS,sn%) 


<96> 53860 RETURS 

<14> 53450 erg=DELKEY(l,0,l,knaa*,sn%) 


<13> 53900 REM suchen mit metachar 

<30> 53460 erg=DELKEY(1,0,2,betrS,sn%> 


<97> 53910 IF ergOO ASD ergOlOl THES GOSUB 50500:RETU 

< 4> 53470 erg=DELKEY(1,0,3, ortS, sn%> 


RI 

<54> 53480 erg=DELKEY(l,0,4,tele*,sn%) 


<37> 53920 GOSUB 52040 

<95> 53490 erg=DELKEY(1, 0,5, vertS, sn'A) 


< 3> 53930 IF ergOO THES GOSUB 50500: RETURS 

<28> 53493 erg=COHSOLIDATE(1) 


<43> 53940 GOSUB 50600 

<22> 53495 RETURS 


<95> 53950 RETURS 

<86> 53500 REM datensatz speichern 


<57> 53999 RETURS 

<31> 53510 z=28:s=26:GOSUB 50100:PRIST eclSjinvS" Daten 


<88> 59000 REM datum holen 

satz wird gespeichert !! "jnrmS 


<78> 59010 OPEH "i",#1,"m:datum.lib" 

<38> 53520 GOSUB 50700 


<37> 59020 ISPUT #1,tag*,non*»Jahr* 

<65> 53530 erg=ADDREC(1,2,0,knumS) 


< 1> 59025 date*=tag*+"."+mon*+". "tjahr* 

<29> 53540 sn«=FETCHREC(l) 


<98> 59030 CLOSE 1 

<66> 53550 erg=ADDKEY(1,0,1,knam5,sn%> 


<76> 59040 RETURS 

< 4> 53555 erg=ADDKEY(1,0,2,betr*,sn%> 


<54> 59100 OPES "i",#1,"m:passwd. lib" 

<52> 53560 erg=ADDKEY(1,0,3,ort*,st%) 


<88> 59110 VHILE SOT EOF(l) 

<24> 53565 erg=ADDKEY(l,0,4,tele*,sn%> 


<27> 59120 ISPUT #1,n*,passwd*,d* 

<40> 53570 erg=ADDKEY(1,0,5,vert*,sn%> 


<24> 59130 IF passwd*=pw* ASD nai»*=nS THES 59160 

<33> 53575 erg=COSSOLIDATB(l) 


<32> 59140 VESD 

<95> 53580 RETURS 


<54> 59150 pw*="" 

<34> 53600 REM datensatz löschen 


<14> 59160 CLOSE 1 

<63> 53607 z=29:s=2:GOSUB 50100:PRIST eclS" Edit: "inv* 


<87> 59170. RETURN 

" auf/ab/links/rechts. DEL "CHR$(252>". DEL "CHR*( 


<41> 59200 REM indexsequentielle datel öffnen 

253>nrm*".. Abspeichern "inv*" ESTER "nrm*". Abbra 


<65> 59210 OPEH "K",1,"b:kukadat“,"b:kukaind",2,satz% 

chen "inv*" EXIT "nrm$ 


<42> 59220 FIELD 1,8 AS knumS,30 AS knam*,15 AS betr*,3 

<90> 53609 PRIST esc*+"v"; 


0 AS ort*,16 AS tele*,15 AS vert*,30 AS stra»,7 AS 

<46> 53610 z=13:s=17:ind=0 


ums*,163 AS verb* 

<50> 53620 GOSUB 50100 


<78> 59230 RETURS 

<28> 53630 a$=ISKEY*:IF a$="" THES 53630 


<51> 60000 PRIFT"error "erg 

<40> 53633 IF a*>=" " ASD a*<="ß" THES 53700 


<73> 60010 CLOSE 1 
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Grafikfälliges 
Mallard-BASIC 
mit GSX 

Folge 3 



Ring frei zur dritten und letzten 
GSX-Runde! In dieser Folge wird ins¬ 
besondere die Ausgabe von Grafi¬ 
ken auf dem Drucker zur Sprache 
kommen. Dazu gibt es noch einige 
spezielle Tips für den Umgang mit 
GSX: Unter anderem werden wir zei¬ 
gen, wie sich der nicht gerade reich¬ 
lich bemessene Speicherplatz des 
grafikfähigen BASICs erweitern 
läßt. Am besten schalten Sie schon 
einmal Ihren Joyce ein und legen Sie 
die in der ersten Folge beschriebene 
Arbeitsdiskette bereit, es geht sofort 
los. 

Als erstes möchten wir Ihnen eine Er¬ 
gänzung zum Demo-Listing der letzten 
Folge präsentieren. Wer bisher noch 
keine Gelegenheit hatte, den leistungs¬ 
fähigen Bildschirmtreiber des CBA- 
SIC-Compilers oder der Programme 
DR Draw bzw. DR Graph auf seine Ar¬ 
beitsdiskette zu kopieren, wird sich 
darüber besonders freuen: Inzwischen 
ist uns nämlich für den Fadenkreuz- 
Grafikcursor (Input Locator) eine Er¬ 
satzlösung eingefallen, die auch mit 
dem normalen Joyce-Bildschirmtreiber 
funktioniert. Grundlage dafür sind zwei 
weitere Unterprogramme: 

— »Set Graph-Cursor« läßt das Faden¬ 


kreuz an der Stelle xl,yl erscheinen. 
— »Remove Graph-Cursor« entfernt die 
Markierung wieder vom Bildschirm, 
ohne daß irgendwelche Text- oder 
Grafikelemente dadurch zerstört 
werden. 

Diese Routinen befinden sich in dem 
ergänzenden Listing ab Zeile 19000 
bzw. 20000! Sie werden beide von dem 
Unterprogramm »Input Locator« (ab 
18000) benutzt, das im Unterschied zur 
letzten Folge die Tastaturabfrage in BA¬ 
SIC organisiert. Ansonsten bildet es ei¬ 
nen vollwertigen Ersatz und kann ohne 
weiteres in das GSX-Demo 2 integriert 
werden. Nur ein kleiner Unterschied ist 
zu vermerken: Die Steuerung des Cur¬ 
sors in kleinen Schritten (pixelweise) 
erfolgt nicht mehr mit SHIFT, sondern 
mit EXTRA + Cursortasten. 


Grafik vom Feinsten: 

GSX mit Drucker 

Zunächst ist hier eine berechtigte Fra¬ 
ge angebracht: Wozu der Aufwand, wo 
doch der Joyce eine Bildschirm-Hard¬ 
copy auf Knopfdruck erlaubt? Doch 
GSX hätte wohl kaum seinen Ruf als 
professionelle CP/M-Grafikerweite- 
rung verdient, wenn es sich damit be¬ 


gnügen würde, den Bildschirminhalt 
auf das Papier zu übertragen. Die hohe 
Auflösung moderner Matrixdrucker er¬ 
laubt nämlich Grafiken in einer Quali¬ 
tät, die ohne weiteres zu Präsentations¬ 
zwecken in der Geschäftswelt aus¬ 
reicht. Ein einfaches Hardcopy-Pro¬ 
gramm wäre hier glatt überfordert, da 
insbesondere in der Vergrößerung das 
grobe Raster der Bildschirm-Grafik zu 
deutlich hervortritt. Nötig sind deshalb 
spezielle Treiberprogramme, die qua¬ 
si jeden Druckpixel einzeln ansteuern. 
Und genau solche Druckerspezialisten 
befinden sich — wenn Sie die Anleitung 
in der ersten Folge genau beachtet ha¬ 
ben - auch auf Ihrer GSX-Arbeitsdis- 
kette. Besonders gute Ergebnisse bringt 
der hochauflösende Treiber DDFX- 
HR8: Er dehnt das bereits vertraute 
GSX-Koordinatensystem auf eine vol¬ 
le DIN A4-Seite aus und setzt wirklich 
jeden einzelnen Büdpunkt mit Bedacht, 
was einerseits in der überzeugenden 
Qualität der Grafiken zum Ausdruck 
kommt, andererseits aber auch in der 
Rechenzeit: Wir haben schon (zugege¬ 
ben komplizierte) Bilder zum Drucker 
geschickt, für die er mehr als eine Stun¬ 
de benötigte! Offensichtlich haben wir 
es hier mit einem Handwerker der al- 
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ten Garde zu tun: Was er macht, das 
macht er richtig. Unbeeindruckt von 
der hektischen Betriebsamkeit moder¬ 
ner Zeiten wendet er sich liebevoll und 
konzentriert seiner Aufgabe zu und läßt 
sich durch nichts stören. Falls ein Le¬ 
ser eine Möglichkeit findet, den Druck¬ 
vorgang ohne einen kompletten Reset 
abzubrechen, so möge er uns das mit- 
teilen — wir haben bislang keinen Weg 
gefunden. 

Auch die Fähigkeiten dieses Speziali¬ 
sten sind über jeden Zweifel erhaben: 
Die verschiedenen Füllmuster (siehe 
letzte Folge) bewältigt er, im Gegensatz 
zum Joyce-Bildschirmtreiber, ohne 
Murren, erlaubt eine Beschriftung in 
vier Richtungen und 12 unterschiedli¬ 
chen Größen, und spendiert als Zuga¬ 
be sogar einen sechsten Linientyp. 
Doch wie findet man nun Zugang zu 
diesen Möglichkeiten? Der Schlüssel 
befindet sich bereits seit der ersten Fol¬ 
ge in Ihren Händen: Es muß nur das 
Unterprogramm »Open Workstation« 
(ab Zeile 50080) mit der Vorgabe devi¬ 
ce/21 aufgerufen werden, bevor das ei¬ 
gentliche Grafikprogramm abläuft. 
Wer das bereits probiert hat, wird sich 
allerdings gewundert haben - es pas¬ 
siert nämlich rein gar nichts! Und das 


hat einen einfachen Grund: GSX 
schreibt zunächst alle Daten in einen 
Puffer und setzt den Drucker erst in 
Gang, wenn man die Arbeitsstation 
wieder schließt (Close Workstation) 
bzw. auf den neuesten Stand bringt 
(Update Workstation). Falls die Grafik 
sehr kompliziert ist und der Pufferspei¬ 
cher nicht ausreicht, lagert GSX die 
Daten sogar auf Diskette aus und eröff¬ 
net zu diesem Zweck eine temporäre 
(zeitweilige) Datei. Man sollte in die¬ 
sem Fall darauf achten, daß sich auf der 
Diskette noch genügend Platz befindet. 


Die Sonne scheint... 

.. .auf unserem Demobild, und mit et¬ 
was besseren Soundmöglichkeiten hät¬ 
ten wir sogar noch Vogelgezwitscher 
eingebaut. Die Szenerie vermittelt - 
wenn auch nicht unbedingt künstlerisch 
wertvoll — einen Eindruck von den 
Möglichkeiten der Druckergrafik: Ne¬ 
ben verschiedenen Schriftgrößen und 
-richtungen ist hier die gesamte Palet¬ 
te der Füllmuster vertreten. Das dazu¬ 
gehörige Listing hat zwar keinen beson¬ 
deren Nutzwert, soll aber auch nur als 
Referenz und Anschauungsmaterial bei 


der Programmierung eigener Anwen¬ 
dungen dienen. 

Schauen wir uns zu diesem Zweck ein 
paar Einzelheiten an: In Zeile 110 wird 
der Drucker als Arbeitsstation gewählt! 
die Gerätenummer 21 sorgt dafür, daß 
der High-Resolution-Treiber von Dis¬ 
kette geladen wird. In den folgenden 
Zeilen produziert das Programm mit 
Hilfe diverser Unterprogramme aller¬ 
lei Grafik, die durch einige REM- 
Kommentare ausreichend dokumentiert 
ist. In Zeile 600 erfolgt dann abschlie¬ 
ßend der Aufruf von Update Worksta¬ 
tion, damit das Bild auch wirklich auf 
dem Drucker erscheint. Dieses Unter¬ 
programm haben wir neu in unsere 
Sammlung von Initialisierungsroutinen 
aufgenommen! Sie finden es ab Zeile 
50210. 

Einige der Grafik-Routinen ab Zeile 
10000 wurden bereits in den letzten Fol¬ 
gen benutzt und erläutert! Wir werden 
uns deshalb jetzt auf die drei Unterpro¬ 
gramme beschränken, die speziell für 
das Demobild neu hinzugekommen 
sind. »Filled Circle« ab Zeile 21000 
zeigt, wie sich mit Hilfe der GSX- 
Funktion »Filled Area« (Funktions¬ 
nummer 9, wir hatten sie bereits bei Fil¬ 
led Box) Kreisscheiben darstellen las¬ 
sen. Übergeben werden vom Hauptpro¬ 
gramm der Mittelpunkt xl,yl und der 
Radius r. In ausreichend kleinen Inter¬ 
vallen werden daraus die Eckpunkte ei¬ 
nes Vielecks berechnet und als Koordi¬ 
naten in das Points Input-Array ge¬ 
schrieben, so daß vom optischen Ein¬ 
druck her ein Kreis entsteht. 

Die nächsten beiden Unterprogramme 
ab Zeile 22000 beschäftigen sich mit 
den Variationsmöglichkeiten bei der 
Beschriftung. »Set Text Direction« 
nimmt in der Variablen angle einen 
Winkel (in Grad) in Empfang, der die 
Richtung der Schrift bei einer Ausga¬ 
be über »Text Graphic Out« (siehe letzte 
Folge) bestimmt. Sinnvoll sind aller¬ 
dings nur 0, 90, 180 und 270 Grad, da 
der Treiber die Zwischenwerte nicht 
realisieren kann. 0 Grad bedeutet die 
normale Lage, die anderen Winkel ge¬ 
ben die Drehung der Basislinie des 
Schriftzugs um den unteren linken Eck¬ 
punkt des ersten Zeichens gegen den 
Uhrzeigersinn an. Die Parameterüber¬ 
gabe ist hier etwas komplizierter als von 
anderen Funktionen her gewohnt: GSX 
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braucht für die Ausführung sowohl den 
Winkel in 1/10 Grad als auch den Cosi¬ 
nus und Sinus des Wertes mal 100 — zu 
faul, um selber zu rechnen, wie man 
sieht! 

»Set Text Size« (Zeile 23000) ermög¬ 
licht es zusätzlich, die Größe der 
Schrift zu bestimmen. Übergeben wird 
in der Variablen size die gewünschte 
Buchstabenhöhe in Koordinateneinhei- 
ten. Was aus dieser Angabe letztendlich 
wird, ist natürlich gerate- bzw. treiber- 
abhängig. Der Joyce-Druckertreiber 
stellt insgesamt 12 verschiedene Größen 
zur Verfügung, Zwischenweite werden 
auf das nächste erreichbare Maß redu¬ 
ziert. Wer die zur Verfügung stehenden 
Größen genau wissen will, kann nach 
dem Aufruf dieser GSX-Funktion eini¬ 
ge Werte abfragen: 

— die tatsächlich erreichte Buchstaben¬ 
breite in ptsout%(l), 

— die tatsächlich erreichte Buchstaben¬ 
höhe in ptsout%(2), 

— die Breite der Buchstabenzelle in 
ptsout%(3), 

— die Höhe der Buchstabenzelle in 
ptsout%(4). 

Die ersten beiden Angaben beziehen 
sich generell auf das große W! eine 
Buchstabenzelle ist der für ein Zeichen 
maximal zur Verfügung stehende Platz. 


Varus, 

gib mir meine Legionen wieder 

rief Kaiser Augustus verzweifelt, nach¬ 
dem Hermann der Rußkehrer selbige 
im Teutoburger Wald vernichtet hatte. 
Ähnliche Gefühle kommen auf, wenn 
man das erste Mal mit der Einschalt¬ 
meldung des grafikfähigen BASICs 
konfrontiert wird: Nur knappe 17 Kbyte 
bleiben noch für eigene Programme 
übrig. GSX, gib mir meine Kilobytes 
wieder! Nun — wenn Sie mit einer rei¬ 
nen Bildschirm-Version zufrieden sind, 
läßt sich hier in der Tat noch einiges ret¬ 
ten. Den Löwenanteil des reservierten 
Speicherplatzes braucht nämlich der 
Druckertreiber mitsamt seinem Puffer, 
und da GSX beim Laden des BASICs 
noch nicht weiß, mit welchem Gerät Sie 
arbeiten wollen, wird eben für alle Fälle 
vorgesorgt. Bereits in der ersten Folge 
wurde erläutert, daß auf die Treiber¬ 


programme über Nummern zugegrif¬ 
fen wird, die in der Datei ASSIGN.SYS 
auf Ihrer Arbeitsdiskette vermerkt sind. 
Da es sich hier um eine ASCII-Datei 
handelt, stellt es jedoch kein Problem 
dar, die Druckertreiber für GSX »un¬ 
sichtbar« zu machen, oder mit anderen 
Worten, eine Datei zu schreiben, die 
nur den Bildschirmtreiber anmeldet. 
Dazu dient das folgende kurze Pro¬ 
gramm: 

10 OPEN “o“, 1 “ASSIGN. S YS “ 

20 PRINT #1,“01 §:DDSCREEN“ 
30 CLOSE 1 

Wenn Sie nun mit SYSTEM das BASIC 
verlassen und es danach gleich wieder 
starten, so meldet es sich in der Tat mit 
mindestens 26000 freien Bytes zurück! 
je nach Bildschirmtreiber können es 
auch mehr sein. Doch Achtung: Von 
nun an will Ihr GSX-BASIC nichts 
mehr von Druckergrafik wissen, es sei 
denn, Sie kopieren wieder die Original - 
Datei ASSIGN.SYS von der Systemdis- 
kette auf Ihre Arbeitsdiskette. Weiter¬ 
hin ist zu beachten, daß Ihnen der neue 
Speicherplatz nur zur Verfügung steht, 
wenn Sie in der Initialisierungsroutine 
ab Zeile 50000 noch eine kleine Ände¬ 
rung vornehmen. Lassen Sie sich zu 
diesem Zweck vor dem ersten Pro¬ 
grammstart die aktuelle Speicherober¬ 
grenze ausgeben (PRINT HIMEM), 
ziehen Sie von diesem Wert 5 ab (das ist 
der Platz für das kleine Maschinenpro¬ 
gramm) und bringen Sie das Ergebnis 
in Zeile 50020 auf folgende Weise 
unter: 

50020 gdos % =UNT(Ergebnis):... 
Eine andere Möglichkeit, zusätzlichen 
Speicherplatz freizumachen, besteht 
darin, die Arrays intin% und ptsin% im 
Initialisierungsteil je nach Bedarf zu 
verkleinern (vergrößern geht eben¬ 
falls). Auch das ptsout%-Feld dürfte 
bei unseren Anwendungen mit 12 aus¬ 
reichend dimensioniert sein (diese An¬ 
gabe ohne Gewähr). . 

Von den Feldern pb%, contrl % und 
intout% sollte man jedoch tunlichst die 
Finger lassen. Insbesondere das letzt¬ 
genannte Array wird im Verlauf der 
Prozedur “Open Workstation“ bis zum 
Rand mit Informationen über das ange¬ 
wählte Gerät vollgeschrieben. Hier er¬ 
fahrt man, ob es farbfahig ist oder nicht, 
wie viele Linientypen und Füllmuster 
zur Verfügung stehen usw. Besonders 


90 PC 2’87 



















Professional Computing— 


interessant sind einige Daten, die die 
Berechnung von Stauchungs- bzw. 
Streckungsfaktoren erlauben, um z.B. 
die Deformation von Kreisen zu Ellip¬ 
sen zu verhindern: 
intout%(l) — Auflösung horizontal 
intout%(2) = Auflösung vertikal 
intout%(4) = Pixelbreite 
intout%(5) = Pixelhöhe 
Als Auflösung wird die maximal mög¬ 
liche Anzahl von Bildpunkten angege¬ 
ben, die Pixelmaße erscheinen in Mi¬ 
krometer (= 1/1000 mm). 

Damit wären wir nun am Ende unserer 
Betrachtungen angelangt. Ergänzend ist 
noch zu bemerken, daß dieser Bericht 
keinen Anspruch auf Vollständigkeit er¬ 
hebt. Unser Hauptanliegen war es, die 
Anwendung von GSX-Funktionen un¬ 


ter Mallard-BASIC praxisorientiert und 
(so hoffen wir) gut verständlich zu er¬ 
läutern. Unter den Tisch gefallen sind 
dabei alle Funktionen, die auf dem Joy¬ 
ce nicht realisierbar oder durch norma¬ 
le BASIC-Kommandos wesentlich ein¬ 
facher auszuführen sind (z.B. Bild¬ 
schirm löschen). Es ist natürlich nicht 
ausgeschlossen, daß der findige An¬ 
wender mit der Zeit noch ein paar zu¬ 
sätzliche Möglichkeiten entdeckt, die 
uns bisher entgangen sind! Außerdem 
wäre z.B. der Low-Resolution-Druk- 
kertreiber und die Plottergrafik noch 
eine genauere Untersuchung wert. We¬ 
sentliche Hilfen kann dabei die GSX- 
Serie in PASCAL International (ab Heft 
1/87) geben, die eine vollständige Do¬ 
kumentation in Form eines Pascal- 


Listings enthält. Wer sich also noch et¬ 
was genauer umschauen möchte, soll¬ 
te sich das nicht entgehen lassen. 
Bedauerlich ist es weiterhin, daß wir 
Ihnen die phantastischen Grafiken vor¬ 
enthalten müssen, die bei diversen Sy¬ 
stemabstürzen auf dem Bildschirm er¬ 
schienen, sie sind leider nicht reprodu¬ 
zierbar — aber vielleicht haben Sie ja 
ähnliches Glück. Auch fehlt uns hier 
der Platz, um die erbaulichen Streitge¬ 
spräche zu protokollieren, die wohl un¬ 
vermeidlich sind, wenn ein BASIC/ 
Assembler-Spezialist und ein über¬ 
zeugter Pascal-Programmierer gemein¬ 
sam an einem Projekt arbeiten. Doch 
was soll’s — wir hoffen, daß Ihnen 
GSX ebensoviel Spaß bereitet hat wie 
uns! (M.Uphoff/M. Schlöter) 


LISTIHG >GSXDEX03<, REMARK = >REM<. 


)* 6) +. fillstyle ) 





<14> 

270. 

... x2 = xl + breite*2/3 


< 1> 

10 


<48> 

280. 

... GOSUB 14000: REM Filled Box 


<93> 

20 


<78> 

290. 

. HEXT fillstyle 


<41> 

30 

***** Drucker - Aasteuerung ••**• 

< 0> 

300 

HEXT fillbase 


<48> 

40 

* <C> 1906 M.Schloeter/K.Uphoff * 

< 4> 

310 

fillbase = 1: fillstyle = 1 : GOSUB 

15000 

< 5> 

50 


<24> 

320 

• 


< 6> 

60 


< 6> 

330 

REM Hier werden die Sonnenstrahlen gezeichnet 

<12> 

70 GOSÜB 50000; SEK Init GSX 

<50> 

340 

xl = 16384 : yl = 26400 


<89 > 

80 cls*=CHR* <27> +"E"+CHR* <27)+"H" 

<39> 

350 FOR linetype = 1 TO 6 


<95 > 

90 con*=CHR*<27)+"e":coff*=CHR*<27)+"f ":statusaff* 

<59> 

360. 

. GOSUB 11000 : REM Set Linetype 



=CHR$ <27>+"0" 

<53> 

370 

. FOR i = 1 TO 5 


<67> 

100 

PRIHT cls*;coff*;statusoff*i 

<70> 

380 

... x2 = RHD * 32767 


<72> 

110 

device = 21 : GOSUB 50080: REM Open Workstatio 

<81> 

390 

... y2 = RHD * 32767 



n <Drucker) 

<37> 

400 

. . . GOSUB 10000 : REM Draw Line 


<22> 

120 

' 

<94> 

410. 

. SEXT i 


< 4> 

130 

REM Hier werden die Kaestchen gezeichnet 

<67> 

420 

HEXT linetype 


<12> 

140 

breite = 2340 

< 7> 

430 

REM Hier wird die Sonne gezeichnet 


<44> 

150 

xl = breite/6 : x2 = xl + breite*2/3 : yl = 50 

<52> 

440 

xl = 16364 : yl = 26400 : r = 1500 



00 

y2 = 15000 

<50> 

450 

GOSUB 21000 : REM Filled Circle 


<37> 

160 

fillbase = 1 : fillstyle = 1 

<33> 

460 

' 


<88> 

170 

GOSUB 15000 : REK Set Fillstyle 

<15> 

470 

REX Und hier könnt die Schrift 


<79> 

180 

GOSUB 14000 : REM Filled Box 

<17> 

480 

REM Grosse Unterschrift 


<15> 

190 

xl = breite*7/6 ; x2 = xl + breite*2/3 

<42> 

490 

size = 1600 : GOSUB 23000 : REM Set 

Text Size 

<10> 

200 

fillbase = 0 : fillstyle = 1 

<58> 

500 

xl = 0 : yl = 1800 


<77> 

210 

GOSUB 15000 : REM Set Fillstyle 

<33> 

510 

outstr* = "Drucker Grafik Demo“ : GOSUB 16000 

<67> 

220 

GOSUB 14000 : REM Filled Box 


: REK Text Graphic Out 


<96> 

230 

FOR fillbase = 2 TO 3 

< 6> 

520 

REK Text um Sonne 


<25> 

240 

. FOR fillstyle = 1 TO 6 

<41> 

530 

size = 600 : GOSUB 23000 : REK Set Text Size 

<26 > 

250 

... GOSUB 15000 : REM Set Fillstyle 

<74> 

540 

xl = 16384 : yl = 26400 : outstr$=SPACE*<4>+ou 

<94> 

260 

... xl = breite*7/6 + breite * <<<fillbase - 2 


tstr* 
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<97> 

550 FOR angle = 0 TO 270 STEP 90 

<26> 

23040 ptsin*(l> = 0 : ptsin%(2> = size 

<88> 

560. , 

GOSUB 22000 : REM Set Text Directicm 

<39> 

23050 

GOSUB 60000 

<34> 

570. . 

GOSUB 16000 : REM Text Graphic Out 

<69> 

23060 

RETURN 

<42> 

580 HEXT angle 

<33> 

23070 

• 

<40> 

590 * 


<86> 

50000 

'««***•**** Init GSX 

< 4> 

600 GOSUB 50210 : REM Update Workstation 

<26> 

50010 

DIM pb%(5>, cantrl%(10>, intin*(255>, ptsin*(10 

<30> 

610 END 


0), intaut*(45), ptsout%d00) 

<27> 

620 ’ 


<57> 

50020 gdasX-&HBDFO:MEMORY gdas*~l 

<90> 

10000 

• iHimm Draw Line ********** 

<85> 

50030 

POKE gdos*,14:P0KE gdos*+l,115: REM ld c,115 

<34> 

10010 

1 * Inputparameter : xl,yl. t 

<30> 

50040 

POKE gdos%+2,195:POKE gdas%+3,5:POKE gdosS+4 

<29> 

10020 

' *. x2,y2. * 


,0:REM jp 0005 

<58> 

10030 


<43> 

50050 

device=l:GOSUB 50080:REM Open Workstation (S 

<58> 

10040 

contrl* (1) =6; contrl* (2) =2 


creen) 

<97> 

10050 

ptsin*(l)=xl:ptsin*(2>=yl:ptsin*(3)=x2:ptsin 

<66> 

50060 

RETURN 


%<4>=v2 

<30> 

50070 

f 

<25> 

10060 

GOSUB 60000:RETURN 

<46> 

50080 


<26> 

10070 

• 

<23> 

50090 

GOSUB 50170:REM Close Workstation 

<45> 

11000 

' ** ******** Set Linetype ********** 

<71> 

50100 

contrl%(l>=l:contrl*(2)=Q:contrl*(4>=10 

<52> 

11010 

'* Inputparameter : linetype. * 

<59> 

50110 

intin*(l)=device 

<47> 

11020 


<13> 

50120 

RESTORE 50150 

<23> 

11030 

contrl*(1)=15:contr1%C2)=0 

<40> 

50130 

FOR i=2 TO 10:READ intin*(i>:NEXT 

<97> 

11040 

intin*(l)=linetype 

<24> 

50140 

GOSUB 60000:RETURN 

<23> 

11050 

GOSUB 60000:RETURN 

< 7> 

50150 

DATA 1,1,1,1,1,1,2,6,1 

<24> 

11060 

• 

<29> 

50160 

• 

<53> 

14000 


<37> 

50170 

••**«*••*** Close Workstation 

<36 > 

14010 

'* Inputparameter : xl.yl. * 

<46> 

50180 

contrl*<l)=2:contrl*(2)=0 

<31> 

14020 


<44> 

50190 

GOSUB 60000:RETURN 

<21> 

14030 


< 8> 

50200 

' 

<83> 

14040 

contrl*(l)=9:cantrl%(2>=4 

<39> 

50210 


<27> 

14050 

ptsin*(l)=xl:ptsin*(2)=yl 

<61> 

50220 

contrl*(l)=4:cantrl%(2)=0 

<32> 

14060 

ptsin*(3)=x2:ptsin*(4)=yl 

<23> 

50230 

GOSUB 60000:RETURN 

<50> 

14070 

ptsin*(5)=x2;ptsin*(6)=y2 

<24> 

50240 

' 

<19> 

14080 

ptsin*(7)=xl:ptsin*(8>=y2 

< 5> 

60000 


<45> 

14090 

GOSUB 60000:RETURN 

<73> 

60010 

pb*(1)=UHT(VARPTR(contr1*(1))) 

< 9> 

14100 

• 

<25> 

60020 

pb*(2 > =UNT(VARPTR(intin%(1))) 

<73> 

15000 

<•***»»••** Set Fillstyle ********** 

<47> 

60030 

pb%(3)=UNT(VARPTR(ptsin%(l))) 

<44> 

15010 

'* Inputparameter : fillbase. * 

<96> 

60040 

pb%(4)=UNT(VARPTR(intout%(l>)) 

<11> 

15020 


<19> 

60050 

pb%(5)=UNT(VARPTR(ptsoutldl>)) 

<41> 

15030 

'*********************************** 

<23> 

60060 

CALL gdos%(gdos%,pb% d)) 

<15> 

15040 

contrl*(l>=23:contrl*(2)=0 

<71> 

60070 

RETURN 

<64> 

15050 

intin*(l)=fillbase 




<46> 

15060 

GOSUB 60000 

LISTING >L0CAT0R <, REMARK = >KEM(. 

<46> 

15070 

contrl*(l>=24:contrl*(2)=0 




<19> 

15080 

intin*(l)=fillstyle 

<95> 

18000 

1 ***** Input Locator selbstgestrickt ***** 

<47> 

15090 

GOSUB 60000:RETURN 

<67> 

18010 

'* Inputparameter: xl.yl. * 

<11> 

15100 

' 

<70> 

18020 

'* Outputparameter: xl, yl, ILchoiceS... * 

<37> 

16000 

•»**•**»*** Text Graphic Out *********** 

<45> 

18030 

'* Interne Variablen: stepx, stepy,. * 

<66> 

16010 

'* Inputparameter : outstrS. * 

<42> 

18040 


<34> 

16020 


<37> 

18050 

•******•*«******«*•*********•••»»»»•***•** 

<94> 

16030 

•*************************************** 

<88> 

18060 

stepx = INT(32767/720) : stepy = INT(32767/2 

<75> 

16040 

contrl%(l)=8:cantrl%(2>=l 


56) 


<54 > 

16050 

contr1% <4)=LEN(outstrS) 

<51> 

18070 

valid.keyS = CHR$<1)+CHR$(6>+CHRS(30)+CHR*(3 

<35> 

16060 ptsin%(l)=xl: ptsin*(2)=yl 


1)+CHRS(49)+CHRS(46)+CHRS(51)+CHRS(53) 

<10> 

16070 

FOR i = 1 TO LEN(outstrS) 

<77> 

18080 

GOSUB 19000:REM Set Graph-Cursor 

<50> 

16080 

. intin*(i) = ASC(MID$(outstrS,i,1)) 

<64> 

18090 

zS=INKEYS:IF z*="" TEEN 18090 

<56> 

16090 

HEXT i 

<34> 

18100 

GOSUB 20000:REM Remove Graph-Cursor 

<27> 

16100 

GOSUB 60000 

<48> 

18110 

ON INSTR(valid.key$,z$> GOTO 18140,18150,181 

<57> 

16110 

RETURN 


60,18170,18180,18190,18200,18210 

<21> 

16120 

• 

<77> 

18120 

ILchoice$=z$:RETURN 

<64> 

21000 

1 »*»*•*•••* Filled Circle ********* 

<29> 

18130 

' 

<55> 

21010 

'* Inputparamter: xl,yl,r. * 

<72> 

18140 

xl=MAX(xl-10*stepx,0):GOTO 18080 

<48> 

21020 

'********************************** 

<90> 

18150 

xl=MIN(xl+10*stepx,32767):GOTO 18080 

<49> 

21030 

i = 0 

<26> 

18160 

yl=MAX(yl-10*stepy,0) :GOTO 18080 

<38> 

21040 

FOR phi = 0 TO 6.28 STEP 0.2 

<44> 

18170 

yl=MIN(yl+10*stepy,32767):GOTO 18080 

<52> 

21050 

. i = i + 1 : ptsin*(i> = C0S(phi>*r. + xl 

<56> 

18180 

xl=MAX(xl-stepx,0):GOTO 18080 

<76> 

21060 

. i = i + 1 : ptsin*(i> = SIN(phi)*r + yl 

< 3> 

18190 

yl=KAX(yl-stepy,0):GOTO 18080 

<74> 

21070 

NEXT phi 

<83> 

18200 

xl=MIN(xl+stepx,32767):GOTO 18080 

<11> 

21080 

contrlÄd) = 9 : contrl*(2> = 1/2 

<30> 

18210 

yl=MIN(yl+stepy,32767):GOTO 18080 

<51> 

21090 

GOSUB 60000 

<28> 

18220 

' 

<44> 

21100 

RETURN 

<40> 

19000 

•***»»* Set Graph-Cursor ****** 

< 8> 

21110 

' 

<91> 

19010 

•* Inputparameter: xl,yl. * 

< 3> 

22000 

'***** Set Text-Direction ***** 

<60> 

19020 


<33> 

22010 

'* Inputparameter angle. * 

<33> 

19030 

contrU(l) = 5 : contrl%(2) = 2 : contr 1«(6) 

<47> 

22020 

'****************************** 


= 18 


<30> 

22030 

contrl*(l) = 13: contrl%(2> = 0 

< 3> 

19040 

ptsin%(l) = xl : ptsin*(2) = yl 

<50> 

22040 

intin*(l) = angle*10 

<50> 

19050 

GOSUB 60000 

<54> 

22050 

intin*(2) = C0S(3.14*angle/180)*100 

<80> 

19060 

RETURN 

<52> 

22060 

intin%(3> = SIN(3.14*angle/180>*100 

<44> 

19070 

' 

<45> 

22070 

GOSUB 60000 

<68> 

20000 

'***** Remove Graph-Cursor ***** 

<75> 

22080 

RETURN 

<51> 

20010 


<39> 

22090 

' 

<92> 

20020 

contrl%(l> = 5 : contrl%(2) = 0 : contrl%<6) 

<68> 

23000 

'****» Set Text-Size ***** 


= 19 


<27> 

23010 

'* Inputparameter size.. * 

<25> 

20030 

GOSUB 60000 

<25> 

23020 

'************************* 

<55> 

20040 

RETURN 

<60> 

23030 

contrl*d> = 12 : contrl*(2> = 1 

<19> 

20050 

‘ 
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Schneider PC 1512 
mit 640 KB RAM 


Als ich am 1. November abends den Schneider PC 1512 mit Colour-Monitor 
und zwei Disketten-Laufwerken ausgepackt und aufgestellt hatte - was voll¬ 
kommen problemlos vonstatten gegangen war - hatte ich natürlich nichts 
eiligeres zu tun, als seine Kompatibilität zu prüfen. Das tat ich mit der Soft¬ 
ware eines Bekannten, der einen EPSON-PC besitzt und mit Profi-Software 
arbeitet. Kurzer Rede langer Sinn (die Reihenfolge dieser Floskel ist bewußt 
so gewählt), es »lief alles«. Wordstar, PCTOOLS, WORD, Sidekick, Mul¬ 
tiplan, OPEN ACCESS, dBASE III.! Alles Original-Software - nichts 

angepaßtes oder zurechtge»patchtes«. 


AMSTRAD PC 640k Cvl) 09:30 am 16 November 1986 
(c)1986 AMSTRAD Consumer Electronics plc 


Microsoft RAMDrive Version 1.16 Virtuelle Diskette C: 
Diskettengröße: 34k 
Sektorgröße: 128 bytes 
Zuordnungseinheit: 1 sectors 
Verzeichnis Einträge: 64 

A>ECHO OFF 

- MOUSE Geräte Treiber v5.00 installiert- 

A> 


Allerdings merkte ich bei den residen¬ 
ten Programmen (zum Beispiel Side- 
kick und PCTOOLS), daß die mitgelie¬ 
ferten 512 KB RAM zwar ausreichten, 
der Spielraum für RAM-Disk und lan¬ 
ge Texte oder Arbeitsdateien jedoch 
recht knapp wurde. Nun, ich bin kein 
Neuling in der Branche und beschloß, 
dem Übel durch eine Aufrüstung um 
128 KB auf die volle MS-DOS- 
Kapazität von 640 KB abzuhelfen. 

Am 3.11. rief ich also die Firma Schnei¬ 
der in Türkheim an und erkundigte 
mich, welche Bauteile ich wohl benö¬ 
tigen würde und was zu tun sei, um die 
Aufrüstung vorzunehmen. 

»Kaufen Sie handelsübliche IC4164/150 
Nanosekunden (18 Stck.) für ein paar 
Mark, sockeln Sie sie auf die noch lee¬ 
ren Plätze auf der Grundplatine und 
stecken Sie den Codierstecker von 512 
auf 640 um. Das ist alles und funktio¬ 
niert auch!« 

Das waren die Worte, die mich sofort 
auf Trab brachten. Ich kaufte die 18 IC’s 
und tat das Angeordnete. Baute den 
Computer wieder zusammen und er¬ 
hielt folgendes Bild nach dem Einschal¬ 
ten und Booten mit Diskette I (MS- 
DOS 3.2): 

Abb.: 1: Anzeige nach dem Systeman¬ 
lauf bei 640 KB 

Nach diesem Erfolgserlebnis - ohne 
Pannen — dachte ich mir, daß andere 
PC 1512-Besitzer sicher auch gerne auf¬ 
rüsten würden, wenn Sie die notwendi¬ 
gen Kenntnisse hätten. Den Garantie¬ 
verlust kann man umgehen, indem man 
halt bis zum Verstreichen der Garantie¬ 
zeit wartet. Oder Sie nehmen ihn in 
Kauf und bauen den Zusatzspeicher 
jetzt schon ein! 

Etwas möchte ich Ihnen mit auf den 
Weg geben, wenn Sie — meiner Be¬ 
schreibung folgend — die Aufrüstung 
ebenfalls vornehmen: Es ist wirklich 
sehr einfach und unproblematisch. Sie 
brauchen keine Befürchtungen zu ha¬ 
ben, daß entweder etwas in die Brüche 
geht, oder das Ganze für Sie nicht 
durchführbar sei. Sie müssen sich 
aber unbedingt an die Beschreibung 
halten. Sollten Sie Fachmann sein, so 
reichen die Fakten aus, die ich aufzei¬ 
ge, die Handgriffe seien Ihnen überlas- 
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sen. Die ganze Operation dauert übri¬ 
gens höchstens 30 bis 45 Minuten — 
nehmen Sie sich aber die Zeit und las¬ 
sen Sie sich nicht in Zeitdruck bringen! 
Seien Sie nicht zu stolz oder zu klug. 
Nutzen Sie die kleinen Kreise an der 
linken Textseite und machen Sie Kreuz- 
chen, wenn Sie die beschriebene Akti¬ 
vität durchgeführt oder den Ratschlag 
gelesen und beherzigt haben! Dann 
wird Ihnen das Werk ebenso leicht und 
vor allem problemlos gelingen — und 
Sie werden das Willkommensbild der 
640 KB (Abbildung 1) auch auf Ihrem 
Schirm begrüßen können. 

• Kaufen Sie 18 Stück (18 x 8KB = 18 
x64 K Bit) IC4164/150 Nanosekun- 
den. Das ist die technische Bezeich¬ 
nung, die mir vom Schneider-Werk 
selbst genannt worden ist. Ihr 
Elektronikbauteile-Händler hat 
vielleicht die IC’s mit dieser Be¬ 
zeichnung nicht da, er weiß aber, 
welche Bausteine mit ggf. einer an¬ 
deren Typenbezeichnung gleich¬ 
wertig sind. Vergessen Sie nicht den 
Zusatz »150 Nanosekunden«. 
Sollten Sie trotzdem Bedenken 
haben, rufen Sie doch zu Ihrer Si¬ 
cherheit in Türkheim an: 

(082 45)5 11 15. 

Kosten: Ich habe DM 6,85 pro Stück 
bezahlt, das sind insgesamt DM 
123,30. Wahrscheinlich kann man 
sie auch billiger bekommen. 


CPU Öffnen und Innenraum 
freilegen 


• Legen Sie sich eine Taschenlampe, 
eine Pinzette (am besten vorne gebo¬ 
gen) und einen Kreuzschraubendre¬ 
her zurecht. 

• Lassen Sie den Computer jetzt noch 
so stehen, wie Sie ihn installiert ha¬ 
ben und schalten Sie ihn aus. 

• Netzstecker aus der Steckdose 
ziehen. 

• Netzkabel aus der CPU ziehen. 

• Monitorkabel aus der CPU ziehen. 

• Eventuell Druckerkabel aus der 
CPU ziehen. 

• Monitor abheben und auf einen si¬ 
cheren, standfesten Platz stellen. 


• Die CPU steht jetzt frontal vor Ih¬ 
nen. Sichern Sie die Batterien, in¬ 
dem Sie einen Streifen Karton mit 
Tesafilm o.ä. darüberkleben. Sie 
sollten nicht herausfallen können, 
wenn der Gehäusedeckel später ab¬ 
gehoben wird. Sie werden also nicht 
(!) entfernt. 

• Schieben Sie den oberen hinteren 
Gehäusedeckel nach hinten ab und 
legen ihn beiseite, aber so, daß sich 
niemand — auch Sie nicht — aus 
Versehen darauf setzen kann. 

• Schieben Sie die seitliche hintere 
Gehäusewand nach hinten ab und le¬ 
gen sie ebenfalls auf einen sicheren 
Platz. 

• Sie sehen auf der Oberseite, in dei 
Nähe der Vorderkante, zwei runde 
Käppchen, eins links und eins 
rechts. Heben Sie sie beide heraus. 
Das geht ganz leicht mit dem Fin¬ 
gernagel. 

• Schrauben Sie die beiden versenk¬ 
ten Schrauben aus den jetzt zu se¬ 
henden Vertiefungen heraus. Mer¬ 
ken Sie sich, welche Schraube Sie 
aus welchem Loch gedreht haben, 
damit sie in dieselben Löcher kom¬ 
men, wenn die CPU wieder zusam¬ 
mengebaut wird. Die Schrauben 
laufen leichter, wenn sie im alten 
Gewinde eingedreht werden. Dies 
gilt für alle Schrauben, die Sie noch 
entfernen müssen. 

• Jetzt drehen Sie die hinteren zwei 
Schrauben heraus (merken!). 

• Sie sehen rechts hinten — die CPU 
steht noch immer frontal vor Ihnen 
- ein von drei Schrauben gehalte¬ 
nes dünnes Blech. Entfernen Sie die 
Schrauben (merken!). Sie sind dün¬ 
ner als die vier Schrauben, die be¬ 
reits an der Seite liegen. 

• Die Frontplatte wird nun vorsichtig 
nach vorne abgezogen — langsam. 
Heben Sie den Gehäusedeckel, der 
ja nun nicht mehr festgeschraubt ist, 
leicht an, wenn die Frontplatte et¬ 
was schwer abzuziehen geht. Klap¬ 
pen Sie die Platte nun seitlich nach 
links hinten, parallel zum Gehäuse 
ab. Vorsicht, die Verbindungsdrähte 
zur Kontroll-Leuchtdiode (Be¬ 
triebs-Lampe) dürfen nicht ge¬ 
spannt sein. 

• So, jetzt geht’s an die Innereien. 


Heben Sie das Gehäuse-Oberteil 
mit den hoffentlich gesicherten Bat¬ 
terien ab und klappen Sie es nach 
hinten weg. Aber aufpassen! 

Das Blech hinten rechts, das vorhin 
noch mit drei Schrauben gesichert 
war, muß vorsichtig etwas abgebo¬ 
gen werden, damit die hintere Kante 
des Gehäuse-Oberteils auch hoch¬ 
geklappt werden kann. Stellen Sie 
das Teil jetzt hochkant, auf der Hin¬ 
terseite stehend nach hinten in den 
Erweiterungs-Schacht. Das geht 
trotz des Batteriekabels ganz gut. 
Seien Sie sicher, daß das Teil von al¬ 
leine steht, bevor Sie es loslassen! 
Stoßen Sie ab sofort nicht mehr an 
den Tisch oder an die Unterlage, 
auf der Ihre CPU steht. 

• Drehen Sie die zwei Schrauben an 
der linken Seite des A:-Laufwerkes 
(links vor Ihnen) heraus. An der 
hinteren linken Schraube ist noch 
ein (schwarzes) Kabel mit einer Öse 
angebracht. Merken Sie sich das 
oder notieren Sie es sich. Es darf 
nachher beim Zusammenbau nicht 
vergessen werden. 

• An der rechten Seite desselben 
Laufwerks sind ebenfalls zwei 
Schrauben zu lösen. Diese Schrau¬ 
ben halten auch das B:-Laufwerk, 
falls es in Ihrer Ausstattung vor¬ 
handen ist (Sie müssen die beiden 
Schrauben wahrscheinlich mit der 
Pinzette herausheben, da der Spalt 
zwischen den beiden Laufwerken 
sehr schmal ist). 

• Sie haben jetzt insgesamt folgende 
Schrauben entfernt: 

2x2 (=4) dicke, verchromte Schrau¬ 
ben, 

3 etwas dünnere, verchromte Schrau¬ 
ben, 

2x2 (=4) messingfarbene Schrauben. 

• Klappen Sie das Laufwerk — 
ebenso wie den Gehäusedeckel — 
hoch nach hinten weg und stellen 
es sicher auf seine Rückseite vor 
dem Gehäusedeckel hin. Achten 
Sie dabei darauf, daß Sie das Gan¬ 
ze so ruhig und vorsichtig machen, 
daß die beiden Flachkabel und das 
Massekabel an der Rückseite des 
Laufwerks nicht verletzt werden. 
Das geht, auch wenn Sie vielleicht 
etwas Geduld aufbringen müssen. 
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Auch das Laufwerk sollte ruhig 
und sicher stehen, bevor Sie es los¬ 
lassen. Nochmals, wackeln Sie 
jetzt nicht mehr an Ihrer CPU- 
Unterlage und der CPU selbst. 

• Sie haben jetzt folgendes Bild (ver¬ 
einfacht) vor sich: 


• Bevor die IC’s eingesetzt werden, 
muß der Codierstecker, der rechts 
neben der zweiten Reihe der leeren 
IC-Sockel über dem Baustein 
A40043, aber unter der Blechab¬ 
deckung sitzt, umgesteckt werden. 

Sie müssen dies unbedingt jetzt 


Abb.2: Ansicht des CPU-Innenraums 
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RAM-Erweiterung einbauen 


Betrachten Sie jetzt Abbildung 3. Sie 
zeigt Ihnen den Bereich, in dem die lee¬ 
ren IC-Sockel liegen. 

Abb. 3: Ansicht der leeren IC-Sockel 
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tun, denn wenn die IC’s eingesetzt 
sind, kommen Sie nur noch sehr 
schwer an diesen Codierstecker 
heran. 

Sie sehen (mit Hilfe der Taschen¬ 
lampe oder einer anderen guten, 
direkten Lichtquelle) ein kleines 
Rechteck, an dessen linker Seite 
»512« und dessen rechter Seite 
»640« aufgedruckt steht. Heben Sie 
nun mit der Pinzette den kleinen 
Plastikstecker, der auf der Seite des 
512-Aufdrucks steckt, ab. Sie sehen 
drei Pinne, über deren linken zwei 
der Stecker gesessen hat. Stecken 
Sie diesen Stecker nun auf die 
rechten beiden Pinne auf (»640«- 
Seite). Damit ist das Umcodieren 
des Kapazitäts-Steckers bereits er¬ 
ledigt. Haben Sie Geduld dabei 
und wenden Sie auf keinen Fall Ge¬ 
walt an. Es muß ganz leicht gehen. 
Jetzt werden die IC’s aufgesetzt. 
Vorher jedoch lesen Sie sorgfältig 
weiter! Tun Sie nichts, bevor Sie 


die folgenden Hinweise gelesen 
haben! 

• Beachten Sie, daß jeder Sockel an 
seiner linken Seite eine halbrunde 
Kerbe auf dem Platinenaufdruck 
eingezeichnet hat. Diese ist wich¬ 
tig, denn die IC’s haben an einer ih¬ 
rer Schmalseiten eine Kerbe. Die 
IC’s müssen so eingesetzt werden, 
daß sich die Kerbe im IC und die 
eingezeichnete Kerbe auf derselben 
Seite befinden. Das ist unbedingt 
(!!!) einzuhalten! 

• Beachten Sie weiter, daß jeder 
Sockel zwei Reihen zu je acht Lö¬ 
chern hat. Als Gegenstück dazu hat 
jeder Ihrer gekauften IC’s auf jeder 
Längsseite je acht Beinchen. Die 
Beinchenreihen stehen meist nicht 
im rechten Winkel zum IC 1 Körper. 
Sie müssen deshalb jedes IC, bevor 
Sie es einsetzen, mit seinen 
Schmalseiten in beide Hände zwi¬ 
schen Daumen und Zeigefinger 
nehmend, mit der gesamten Bein- 
chenreihe vorsichtig gegen eine ge¬ 
rade Fläche drücken, bis die Rei¬ 
he rechtwinklig zum IC-Körper 
steht. Dasselbe ist mit der zweiten 
Beinchenreihe zu tun. Als sehr 
praktisch hat sich die Tischkante 
des Tisches erwiesen, auf dem 
meine CPU steht. Achten Sie dar¬ 
auf, daß dabei jeweils die gesamte 
Beinchenreihe in einer geraden 
Reihe bleibt! 

• Beim Aufsockeln der IC’s beginnen 
Sie mit der obersten Reihe und ge¬ 
hen dann Reihe für Reihe durch, 
bis zur untersten, neunten Reihe. 
Setzen Sie zuerst das linke IC in je¬ 
der Reihe ein, dann erst das rech¬ 
te. Diese Reihenfolge des Einbaus 
war für mich als Rechtshänder am 
bequemsten, um leicht an die 
ne gebogen ist) oder einem flachen 
Schraubendreher einmal unter die 
rechte, dann unter die linke Seite, 
jeweils an der IC-Schmalseite un¬ 
ter den IC-Körper und hebeln den 
Baustein vorsichtig heraus, um ihn 
dann nochmals richtig bzw. mit ge¬ 
raden Beinchen einzusetzen. Gege¬ 
benenfalls muß das Nachbar-IC 
auch herausgenommen werden, da¬ 
mit Sie an den eigentlichen Patien¬ 
ten herankommen. 


l 
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Steckplätze zu kommen und mir 
nicht selbst im Wege zu sein, wenn 
das jeweils nächste IC eingesetzt 
werden sollte. 

• Für jedes IC, das Sie nun einsetzen, 
gilt dasselbe: Nehmen Sie das Bau¬ 
teil mit der Pinzette (mit der rech¬ 
ten Hand, wenn Sie Rechtshänder 
sind, ansonsten wahrscheinlich mit 
der linken Hand) auf und setzen es 
vorsichtig — mit der Kerbe auf der 
linken Seite (!!!) — auf den Sockel. 
Drücken Sie nun mit dem Zeigefin¬ 
ger der anderen Hand leicht auf das 
IC, wenn es wirklich gerade auf 
den Lochreihen sitzt. Sie spüren es, 
wenn die Beinchen in den Löchern 
sitzen und sich das IC weiter ein- 
drücken läßt. Wenden Sie auf kei¬ 
nen Fall Gewalt an, damit sich nicht 
eines oder mehrere Beinchen ver¬ 
biegen, denn diese müssen Sie 
dann einzeln mit der Pinzette wie¬ 
der geradebiegen, bevor Sie einen 
neuen Versuch starten, das IC auf¬ 
zusockeln. Die IC’s sitzen ziemlich 
stramm auf. Sie dürfen trotzdem 
keinerlei Gewalt anwenden, wohl 
aber sanften Druck. 

• Sockeln Sie nun die IC’s auf — 
nach ca. 15 — 20 Minuten ist die¬ 
se Arbeit beendet. Lassen Sie sich 
aber bitte Zeit und achten Sie dar¬ 
auf, daß die IC's fest auf ihren 
Sockeln sitzen! 

• Wenn Sie alle Bausteine aufgesetzt 
haben, tun Sie sich bitte den Gefal¬ 
len und kontrollieren jedes IC ein¬ 
zeln. 

a) Stecken beide Beinchenreihen 
sauber in den Fassungen? Können 
Sie kein Beinchen entdecken, wel¬ 
ches etwa nicht glatt in der Fassung 
steckt, sondern verbogen aussieht? 
Nehmen Sie dazu eine Taschenlam¬ 
pe zu Hilfe. 

b) Ist die Kerbe des IC’s auf der lin¬ 
ken Seite? 

c) Sitzt das IC wirklich ganz in der 
Fassung? Prüfen Sie dies und ver¬ 
sichern Sie sich durch Drücken mit 
dem Zeigefinger auf die linke und 
rechte Oberseite des IC. 

Sollte ein IC falsch oder mit verbo¬ 
genen Beinchen aufsitzen, so fassen 
Sie mit der Pinzette (wenn sie vor- 


• So, das war es bereits. Vielleicht 
kommt es dem einen oder anderen 
Leser ein bißchen zu ausführlich 
vor, wie ich die Operation be¬ 
schrieben habe, aber denken Sie 
doch bitte daran, daß auch Leser 
unter uns sind, die so etwas noch 
nie unternommen haben und des¬ 
halb besser ein klein wenig mehr an 
der Hand genommen werden 
sollten. 


Zusammenbau der CPU 


• Klappen Sie das Laufwerk nun 
wieder nach vorne und setzen es 
mit den Laschen für die vier 
Schrauben sauber auf die Bohrlö¬ 
cher. Achten Sie auf die Kabel auf 
der Rückseite des Floppy-Lauf- 
werkes. Drehen Sie die vier mes- 
singfarbenen Schrauben in ihre Lö¬ 
cher. Vergessen Sie nicht das Kabel 
mit der Öse an der hinteren linken 
Schraube wieder mit zu befestigen! 
Die rechten beiden Schrauben müs¬ 
sen mit der Pinzette eingesetzt wer¬ 
den, wenn Sie zwei Laufwerke be¬ 
sitzen. 

• Jetzt setzen Sie die Frontplatte ein. 
Sehen Sie zu, daß das Kabel zur Be¬ 
triebsanzeige ordentlich zwischen 
der Schraubenführung und der lin¬ 
ken CPU-Wand liegt. Es wird sonst 
eventuell in der Aussparung der 
Frontplatte für das linke Laufwerk 
eingeklemmt. 

• Der Gehäusedeckel der CPU wird 
nun auch nach vorne geklappt und 
vorsichtig aufgesetzt. Aufpassen: 
Hinten rechts muß das Blech wie¬ 
der etwas abgebogen und dann wie¬ 
der zurückgedrückt werden, damit 
der Deckel sauber eingesetzt wer¬ 
den kann. 

• Prüfen Sie, ob jetzt sowohl die 
Frontplatte als auch der Gehäuse¬ 
deckel ordentlich eingepaßt sind, 
keine Kabel stören und die Gehäu¬ 
sekanten genau aneinandersitzen. 
Eventuell müssen Sie beide Teile 
wieder abnehmen und das Ganze 
nochmals durchführen. 

• Sie drehen jetzt die drei dünneren 
Schrauben der verbliebenen sieben 
Schrauben in die Halterung hinten 
rechts (Blech im Erweiterungsteil 


der CPU) und die vier dickeren 
Schrauben (hinten zwei und vorne 
zwei) in die Bohrungen im Ge¬ 
häuse-Oberteil. Setzen Sie die bei¬ 
den Käppchen wieder in die vorde¬ 
ren beiden Schraubenlöcher. 

• Schieben Sie die seitliche hintere 
Wand und die obere hintere Ab¬ 
deckung des Erweiterungs-Ge¬ 
häuseteils ein. Sollten Sie die Kabel 
der Tastatur und der Maus abge¬ 
nommen haben, können Sie diese 
jetzt auch wieder einstecken. 

• Nachdem Sie nun den Monitor auf 
der CPU eingesetzt haben, verbin¬ 
den Sie diesen mit der CPU (dün¬ 
nes Kabel in den Video-Ausgang 
und dickes Kabel in den DC-Ein¬ 
gang). 

• Vergessen Sie nicht das Drucke rka- 
bel und stecken Sie jetzt auch das 
Netzkabel in die Steckdose. 

• Schalten Sie den Computer ein. 
booten Sie mit Diskette 1 (MS-DOS 
3.2) und kontrollieren Sie, ob die 
Anzeige mit der hier gezeigten Ab¬ 
bildung 1 übereinstimmt. 

• Wenn Sie die richtigen Bausteine 
gekauft und bekommen haben, muß 
die Aufrüstung erfolgreich gewesen 
sein. Es sei denn, Sie haben den 
Codierstecker vergessen, einen 
Baustein falsch eingesetzt oder ihn 
nicht richtig aufgedrückt. 

• Dem Fall von falschen Bausteinen 
können Sie Vorbeugen, indem Sie 
im Zweifelsfall bei Schneider anru- 
fen und sich nochmals vergewis¬ 
sern. Bei den anderen Fehlermög- 
lichkeiten hilft Ihnen nur der bitte¬ 
re Weg, die CPU wieder abzuschal¬ 
ten, zu entkabeln, zu öffnen und alle 
Arbeiten nochmals zu kontrol¬ 
lieren. 

• Denken Sie daran, Ihre Garantie ist 
hiermit erloschen. Prüfen Sie, ob 
Ihnen dies die Erweiterung wert ist 
und ob Sie sich selbst diese Arbeit 
Zutrauen. Ich habe zwar nicht die 
kleinste Schwierigkeit gehabt und 
Sie sollten sie auch nicht bekom¬ 
men, wenn Sie sich an die Anwei¬ 
sungen halten; aber die kleinste 
Schlamperei oder Unvorsichtigkeit 
kann Sie um den wohlverdienten 
Erfolg Ihrer Arbeit bringen. 

(H. Kleiner) 
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von CP/M 
ZU MS-DOS 

Teil 2 

Im zweiten Teil unserer Serie über 
MS-DOS erfahren Sie einiges über 
das Umbenennen und Löschen von 
Dateien. Außerdem lernen Sie die 
Möglichkeiten zum Editieren Ihrer 
Eingaben kennen. 

In der letzten Ausgabe haben Sie erfah¬ 
ren, was es mit dem »Prompt« A > auf 
sich hat. Er zeigt an, welches Laufwerk 
angemeldet ist. Unter der Bezeichnung 
»angemeldet« versteht man dasjenige 
Diskettenlaufwerk, das von MS-DOS 
automatisch angesprochen wird, wenn 
Sie nicht ausdrücklich einen anderen 
Kennbuchstaben für eine Floppystation 
angeben. 

Um das etwas zu verdeutlichen: Stellen 
Sie sich vor, der DOS-Prompt ist im 
Augenblick »A > «. Wenn Sie DIR ein¬ 
geben, zeigt der Computer das Inhalts¬ 
verzeichnis der Diskette in A: an. Nur 
wenn Sie ausdrücklich DIR B: schrei¬ 
ben, liest MS-DOS die Daten von der 
anderen Diskettenstation. 

Wenn Sie aber viel mit dem Laufwerk 
B: arbeiten, ist es ziemlich lästig, stän¬ 
dig dessen Laufwerksbezeichnung an¬ 
geben zu müssen. Deshalb können Sie 
dauerhaft auf dieses Laufwerk um¬ 
schalten. Der Befehl hierzu heißt »B:«. 
Das sieht bei der Eingabe so aus: 

A>B: 

Der DOS-Prompt ändert sich sofort: 

B> 

Geben Sie nun »DIR« ein, wird vom 
Betriebssystem die Diskette in B: abge¬ 
sucht. 


Welche Laufwerke? 


Bis jetzt kennen Sie die Laufwerke A: 
und B:. Aber wieviele Diskettenstatio¬ 
nen besitzt MS-DOS eigentlich? MS- 
DOS — und ebenso DOS-Plus — ist in 
dieser Beziehung sehr flexibel. Es kann 
eine Vielzahl von Laufwerken verwal¬ 
ten, weit mehr als bei Ihnen jemals vor¬ 
handen sein werden. Diese buchstabiert 


MS-DOS mit A:, B:, C: usw. durch. 
Welches Laufwerk welche Bezeich¬ 
nung bekommt, ist zwar nirgendwo 
vorgeschrieben, es haben sich aber fol¬ 
gende Regeln durchgesetzt: 

A: ist die erste Diskettenstation. Sie ar¬ 
beitet mit auswechselbaren Disketten, 
meistens mit einer Größe von 5,25 Zoll. 

B: ist die zweite Floppystation. Ist kein 
zweites Laufwerk eingebaut, kann MS- 
DOS es simulieren. Sie kennen das 
vielleicht schon von CP/M Plus auf 
dem CPC6128 und Joyce. In diesem 
Fall müssen Sie von Zeit zu Zeit die 
Diskette, die B: simulieren soll, in das 
Laufwerk A: einlegen. Keine beson¬ 
ders elegante Lösung, aber immerhin 
billiger als ein zweites Laufwerk... 

Bei C: scheiden sich die Geister. Ist 
eine Festplatte (Hard-Disk) installiert, 
belegt sie diese Laufwerksbezeichnung. 
Fehlt sie, wird C: von der eventuell in¬ 
stallierten RAM-Disk eingenommen. 
Sonst wandert die RAM-Disk automa¬ 
tisch nach D:. Bei Computern mit meh¬ 
reren Festplatten bekommen die Hard- 
Disks die Bezeichner C:, D:, E: usw; 
Die RAM-Disk wird immer als letzter 
Laufwerkskenner eingereiht. 


Was eine Festplatte ist, wissen Sie si¬ 
cher. Das sind — vereinfacht gesagt - 
hermetisch abgeschlossene Disketten¬ 
laufwerke, in denen die Magnetschei¬ 
be mit hoher Geschwindigkeit rotiert. 
Durch im Vergleich zu Floppys höhe¬ 
re Präzision werden Speicherkapazitä¬ 
ten zwischen 10 MByte und sagenhaft 
anmutenden 500 MByte erreicht. 

Eine RAM-Disk ist ein Diskettenlauf¬ 
werk, das keines ist! Um dieses Para¬ 
doxon aufzulösen: Eine RAM-Diskette 
ist nichts anderes als ein Speicherbe¬ 
reich im RAM des Computers, der vom 
Betriebssystem wie ein Diskettenlauf¬ 
werk angesprochen wird. RAM-Disks 
haben den Vorteil, daß sie viel schnel¬ 
ler arbeiten können als Floppys und so¬ 
gar Festplatten, weil keine mechani¬ 
schen Teile bewegt werden müssen. Ihr 
größter Nachteil besteht aber darin, daß 
ihr Inhalt beim Ausschalten des Com¬ 
puters verlorengeht. Unter »Ausschal¬ 
ten« darf man aber nicht nur das be¬ 
wußte Abschalten der Stromversorgung 
verstehen, sondern auch einen unge¬ 
wollten Stromausfall oder einen Sy¬ 
stemabsturz. Eine nicht unbeträchtliche 
Anzahl von Computerbenutzem hat zu 
sehr auf die Perfektion der Technik und 
der Software vertraut und endlose Men- 
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gen von Daten in RAM-Disks durch 
Systemabstürze verloren. Seien Sie also 
gewarnt! Wenn Sie das stets bedenken, 
ist die Gefahr, daß Ihnen etwas ähnli¬ 
ches passiert, viel geringer. Als Merk¬ 
regel sollte man beherzigen, daß man 
nur Programme oder bereits fertigge¬ 
stellte Dateien in die RAM-Disk laden 
sollte, nie aber, zum Beispiel bei einer 
Textverarbeitung, den Text, der gerade 
erstellt wird. 


Löschen mit Gefahren 

Irgendwann einmal fangt jede Disket¬ 
te an, vor Daten und Dateien überzu¬ 
quellen. Besonders die anfangs noch 
recht groß erscheinende Diskettenkapa¬ 
zität von 360 KByte ist überraschend 
schnell erschöpft. Dann ist der Augen¬ 
blick gekommen, an dem man sich ent¬ 
scheiden muß, entweder eine neue Dis¬ 
kette anzulegen oder von einigen Datei¬ 
en Abschied zu nehmen. 

Das Löschen von Dateien wird uns jetzt 
beschäftigen. In CP/M ist das ja kein 
Problem. Man tippt einfach: 

A>ERA PIP.COM 

Und weg ist die Datei. In MS-DOS ist 
das ganz ähnlich. Nur müssen Sie statt 
ERA die ausführliche Bezeichnung 
ERASE verwenden: 

A > ERASE CHKDSK.EXE 

Ähnlich den Angaben beim DIR-Befehl 
von MS-DOS können Sie eine Lauf¬ 
werksbezeichnung sowie die Joker- 
Zeichen * und ? benutzen. Einige Bei¬ 
spiele für ERASE sehen so aus: 

A> ERASE** 

A> ERASE* EXE 
A> ERASE C?????SK* 

A > ERASE B:C*COM 

Lediglich die Formulierung »ERASE 
A:« oder »ERASE B:« wird bewußt 
nicht unterstützt. Das wäre viel zu ge¬ 
fährlich. Denn ein solcher unbedachter 
Befehl würde eine ganze Diskette oder 
Festplatte löschen. 

Bevor Sie diese Beispiele aber in der 
Praxis ausprobieren, sollten Sie daran 
denken, daß die Dateien wirklich ge¬ 
löscht werden! 

Eine Rekonstruktion gelöschter Datei¬ 


en ist in MS-DOS ungleich schwieriger 
als unter CP/M. Hier reicht es nicht, 
das berühmte $E5-Byte zu ändern. Mit 
den Mitteln von MS-DOS können Sie 
gelöschte Dateien gar nicht mehr lesbar 
machen. Es existieren aber verschiede¬ 
ne Hilfsprogramme wie die Norton- 
Utilities oder PC-Tools, die diese Auf¬ 
gabe übernehmen. Perfekt sind diese 
Programme allerdings dennoch nicht. 
Merkregel: Erst überlegen, dann lö¬ 
schen! 

Versuchen Sie, alle Dateien einer Dis¬ 
kette mit dem Wildcard-Symbol *.* zu 
löschen, fragt MS-DOS sicherheitshal¬ 
ber noch einmal nach: 

A> ERASE** 

Sind Sie sicher (J/N)? 

Wenn Ihnen der ERASE-Befehl nicht 
gefällt, können Sie stattdessen DEL 
verwenden. DEL hat exakt dieselbe Be¬ 
deutung: 

A>«DEL EDLIN.COM 
A> DEL* EXE 

Für unverbesserliche CP/M-Anhänger 
bietet DOS-Plus auch noch eine CP/M- 
kompatible Version zum Löschen von 
Dateien. Dieser Befehl heißt unter 
DOS-Plus ... richtig: ERA 

A > ERA TREE.CMD 
A > ERA *.* 

Sind Sie sicher (J/N)? 


RENAME verdreht 

Ab und zu will man Dateien einen neu¬ 
en Namen verpassen. Das macht man 
unter CP/M mit dem REN- 
Kommando. Bei CP/M Plus kann man 
auch die Langform RENAME ver¬ 
wenden. 

MS-DOS und DOS-Plus besitzen eben¬ 
falls die Abkürzung REN und die aus¬ 
geschriebene Bezeichnung RENAME. 
Also endlich mal ein Befehl, der ein¬ 
fach von CP/M übernommen wurde? 
Weit gefehlt, denn die 16-Bit- 
Betriebssysteme wollen die beiden Da¬ 
teinamen genau in umgekehrter Rei¬ 
henfolge. 

Bei CP/M-80 und CP/M Plus schreibt 
man beispielsweise: 

A > REN NEU.DAT=ALT.DAT 


Unter MS-DOS beziehungsweise DOS- 
Plus verwendet man wiederum diese 
Schreibweise: 

A > REN ALT.DAT NEU.DAT 
A > RENAME ALT.DAT NEU.DAT 

Als »Entschädigung« dafür, daß Sie 
sich umgewöhnen müssen, kann MS- 
DOS auch mehrere Dateien auf einen 
Streich umbenennen. Nehmen wir an, 
auf einer Diskette befinden sich die fol¬ 
genden Dateien: 

BRIEF1.DOC 

BRIEF2.DOC 

BRIEF3.DOC 

Sie wollen jetzt auf ein anderes Textpro¬ 
gramm umsteigen, das als Namenser¬ 
weiterung nicht ».DOC«, sondern 
».TXT« erwartet. Statt jetzt sofort drei 
RENAME-Befehle einzutippen, kön¬ 
nen Sie sich durch etwas Nachdenken 
eine Menge Arbeit ersparen. Denn RE¬ 
NAME darf auch Wildcards wie * und 
? übernehmen. Geben Sie also einfach 
die folgende Befehlszeile ein: 

A > RENAME *.DOC *.TXT 

Damit das DOS aber mit den Umbe¬ 
nennungen fertig wird, müssen alle Jo¬ 
kerzeichen im ersten und im zweiten 
Dateinamen genau an derselben Stelle 
stehen. Ein Befehl wie RENAME 
*.DOC A* ist allein schon deswegen 
unzulässig, weil dann MS-DOS versu¬ 
chen würde, mehrere Dateien mit dem 
Namen A.DOC anzulegen. 


Eingeschränkter Komfort 

Sicher kommt es immer wieder einmal 
vor, daß Sie eine Kommandozeile ein¬ 
geben und dann bemerken, daß Sie in 
ihr einen Fehler gemacht haben. Auf 
diesem Gebiet merkt man CP/M 2.2 
sehr deutlich sein doch inzwischen 
recht hohes Alter an. Hier beschränken 
sich die Editiermöglichkeiten weitge¬ 
hend auf den Einsatz der DEL-Taste. 
Man tastet sich von rechts an die Feh¬ 
lerstelle heran und muß alle danach ein¬ 
getippten Zeichen nochmals eingeben. 

Im Gegensatz dazu holt CP/M Plus al¬ 
les heraus, was mit einem Zeileneditor 
machbar ist. Man kann sowohl die letz- 
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Ob Sie sich gerade einen PC gekauft 
haben oder direkt vor dieser Entscheidung 
stehen - In jedem Fall sollten Sie PC für 
Einsfeiger lesen. Zu diesem Buch haben 
sich zwei Journalisten durch ihre eigenen 
Einsfeigererfahrungen anregen lassen. 
Dementsprechend klar und deutlich wird 
auch auf typische Einstelgerprobleme ein¬ 
gegangen: Worauf sollte man bei Software 
achten? Was sind eigentlich DOS-Disket- 
ten? Oder Batch-Dateien? Hier finden Sie 
Antworten. 

PC für Einsteiger 
Hardcover, 353 Seiten, DM 49,- 


CW'ßAsic 

PCBAsic 


EIN DATA BECKEN BO CH 


Ein Buch für Einsteiger und Aufsteiger - 
von seiner Struktur her so aufgebaut, daß 
es dem Anfänger als Einführung dient und 
dem Anwender als Nachschlagewerk, Ein 
paar Stichworte gefällig? Bitte: Datenver¬ 
waltung, Druckerausgabe, Grafik und 
Sound programmieren, Window-Technik, 
Interrupt-Programmierung. Zusätzlich 
bietet Ihnen der Autor eine ganze Reihe 
von fertigen Utilities, mit denen Sie Ihre 
Arbeit am PC noch effektiver gestalten 
können. 

Das große Buch zu GW-BASIC/PC-BASIC 
Hardcover, 370 Seiten, DM 49,- 


POBAsic 

Für FoRTqcschRiTTCNi 


EIN DATA BECKEN BUCH 
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GW-BASIC/PC-BASIC für Fortgeschrittene - 
in diesem Buch finden Sie alles, was aus 
einem BASIC-Programm ein Profi-Pro¬ 
gramm macht. Das sind z.B. Programme, 
die selbst erkennen, welcher Monitor 
angeschlossen ist, die gegen versehentli¬ 
chen Abbruch gesichert sind, die universell 
Daten verwalten können, die beliebige 
Drucker ansteuern und vieles mehr. Ent¬ 
decken Sie die Möglichkeiten Ihres PC in 
BASIC. 

GW-BASIC/PC-BASIC für Fortgeschrittene 
Hardcover, ca. 350 Seiten, DM 49,- 
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Ein Buch, auf das Sie sich voll und ganz 
verlassen können. Zwei erfahrene Redak¬ 
teure des Compufermagazins DATA WELT 
haben sich ein Jahr auf den Schneider PC 
vorbereitet. Dann testeten sie das Gerät 
gründlich - lange vor der eigentlichen 
Markteinführung. Mit diesem Buch bekom¬ 
men Sie nun vor dem Kauf Bewertungs¬ 
kriterien an die Hand und haben nach dem 
Kauf einen schnellen Ratgeber bei den 
vielfältigen Fragen rund um den Schneider 
PC. 

Das kann der Schneider PC 
173 Seiten, DM 29- 


SdiNEidER 

PC 


Das 

(jRoße 

BAsic 

Buch 


EIN DATA BECKEN BUCH 

BASIC programmieren unter GEM - das 
große BASIC-Buch zum Schneider PC zeigt 
Ihnen, wie es geht. Vom ersten Kontakt mit 
BASIC2 zum ersten Programm, vom ersten 
Spiel zur professionellen Anwendung. Ein 
Buch also, in dem der Einsfeiger genauso 
findet, was er sucht, wie der Profi. Natür¬ 
lich kommen auch Tips und Tricks zu den 
unterschiedlichsten Bereichen der BASIC- 
Programmierung auf dem Schneider PC 
nicht zu kurz. Alles in allem: Information 
rundum. 

Das große BASIC-Buch zum Schneider PC 
Hardcover, 384 Seiten, DM 49,- 


& Tricks 
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Warum sollte man etwas Gutes nicht noch 
verbessern? Wordstar zum Beispiel: 

Lernen Sie, wie man verlorenen Text doch 
noch aus dem Speicher retten kann. Oder 
wie man einen dynamischen Seiten¬ 
umbruch bewirkt. Oder wie man mit Word¬ 
star und anderen Programmen zusammen¬ 
arbeitet. Oder wie man Wordstar an seine 
Umwelt anpaßt. Oder wie man mit Word¬ 
star proportionale Schrift erreicht. Kurz: 
Entdecken Sie Wordstar und seine Mög¬ 
lichkeiten noch einmal neu. 

Wordstar Tips & Tricks 
224Seiten, DM 39- 
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Schneider PC für Einsteiger hilft Ihnen 
beim Start in die PC-Weit. Das Buch ist 
aber nicht nur ein Einstieg in die Grund¬ 
funktionen des Rechners, sondern 
beschäftigt sich auch intensiv mit anderen 
wichtigen Dingen: z.B. mit Software, wie 
den sogenannten GEM-Anwendungen. Von 
GEM-PAINT, das zum Lieferumfang gehört, 
bis GEM-WRITE. Was können die Pakete, 
wo setzt man sie ein usw. Endlich ein 
Buch, mit dem man PC-Zukunff planen 
kann. 

Schneider PC für Einsfeiger 
Hardcover, ca. 300 Seiten, DM 49,- 
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C ist eine starke Sprache mit starken Argu¬ 
menten: Sie ist portabel, hat klare Struktu¬ 
ren und eignet sich besonders zur System¬ 
programmierung. Nutzen Sie diese Vorteile. 
Lernen Sie G. Mit .0 für Einsteiger“ wird es 
Ihnen leichtfallen. Denn hier finden Sie 
neben einer detaillierten Einführung auch 
alles über die weiterführenden Sprachele- 
mente: Datenfelder, l/O-Operafionen, Pro¬ 
grammstrukturen, Schleifen... C für Ein¬ 
steiger - eine praxisorientierte Einführung 
in die Sprache der Zukunft. 

C für Einsteiger 

Hardcover, co. 300 Seiten, DM 49,- 


Turbo Pascal - immer mehr BASIC-Pro- 
grammierer fragen sich, wie man am 
schnellsten auf diese Sprache umsteigen 
kann. Die Antwort: Das Buch von BASIC zu 
Turbo Pascal. Anhand einfacher BASIC- 
Programme werden Turbo-Pascal-Routinen 
erklärt. So versieht man rasch die Struktu¬ 
ren der neuen Sprache und ist in kürzester 
Zeit in der Lage, die ersten eigenen Pro¬ 
gramme zu schreiben - was ja schließlich 
auch Ihr Ziel war. 

Von BASIC zu Turbo Pascal 
Hardcover, 367 Selten, DM 49,- 


Wer ernsthaft in Turbo Pascal programmie¬ 
ren will, sollte dieses Buch nutzen, von der 
praxisnahen Einführung in Turbo Pascal 
und den Grundlagen von MS-DOS/PC-DOS 
über Tips und Tricks zur rationellen Pro¬ 
grammerstellung bis hin zur Dokumenta¬ 
tion. Wer das große Buch zu Turbo Pascal 
gelesen hat, weiß, wie man Progomme 
rundherum professionell macht. Viel¬ 
leicht ist das Ihr erster Schritt zum 
Software-Autor? / 

Das große Buch zu lürtoo Pascal / 
Hardcover, ca. 500 Seiten. 

DM 59,- 


Aus dem Schneider PC kann man noch 
mehr herausholen, als Sie vielleicht ver¬ 
mutet haben. Wie das geht? Das sagt 
Ihnen Schneider PC Tips & Tricks. Was 
kann man mit DOS, GEM, BASIC oder auch 
anderen Programmiersprachen machen? 
Hier ein paar Anregungen: einen Pro¬ 
gram mgenerator, eine neue Tastaturbele¬ 
gung, 3-D-Grafik mit Shading, Animation, 
eine Dialog-Box, eine RAM-Disk, einen 
Mini-Notizblock mit Batchverarbeitung, 
Sound... Mehr demnächst in diesem Buch: 
Schneider PC Tips & Tricks 
Hardcover, 245 Seiten, DM 49,- 

PC-Software und 
-Bücher von DATA 
BECKER - detailliert 
und übersichtlich 
dargestellt im PC- 
Info 1986/87. 
Umfangreich mit 
allen wichtigen 
Eckdaten wer¬ 
den Sie über 

die PC-Programme von DATA 
BECKER informiert. Mit kom¬ 
pletter Buchliste der PC- 
Biicher von DATA BECKER. 

Schauen Sie sich dieses 
leistungsstarke An¬ 
gebot an. Fordern 
Sie das kosten¬ 
lose PC-lnfo 
1986/87 _ 

an. /JL . 
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PC 


InFo 
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DATA BECKER 

Merowingerstr. 30 - 4000 Düsseldorf Tel. (0211) 310010 
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te Befehlszeile zurückholen als auch 
den Cursor an jede beliebige Stelle in 
der Zeile bewegen und dort Einfügun¬ 
gen oder Löschungen vornehmen. 
Der Zeileneditor von MS-DOS bietet 
bessere Möglichkeiten als der von 
CP/M 2.2. Diese reichen aber nicht an 
die von CP/M Plus heran. In dieser Be¬ 
ziehung kann also MS-DOS keinen 
Vorteil für sich verbuchen. 

Bei Korrekturen in der aktuellen Kom¬ 
mandozeile muß man sich wie im heut¬ 
zutage archaisch anmutenden CP/M 
2.2 mit der — DEL-Taste begnügen, für 
die man auch »Cursor links« drücken 
kann — das allerdings nur, wenn der 
Zehnerblock nicht mit »Num Lock« ak¬ 
tiviert wurde. 

Weitergehende Editierbefehle beziehen 
sich auf die letzte eingegebene Zeile. 
Sie müssen sich also gedanklich zwei 
Textzeüen vorstellen: diejenige, die Sie 
gerade eintippen, und eine weitere, die 
den Inhalt der letzten Zeile gespeichert 
hat. 

Nehmen wir an, Sie haben den DIR- 
Befehl in der folgenden Form einge¬ 
geben: 

A > DIR B: 

MS-DOS hat daraufhin das Inhaltsver¬ 
zeichnis der Diskette in B: aufgelistet. 
Nun wollen Sie auch alle Dateinamen 
der RAM-Diskette C: sehen. Dazu 
müßten Sie normalerweise erneut DER 
C: eintippen. Machen Sie aber doch 
einmal folgendes: Drücken Sie viermal 
auf die Funktionstaste Fl. Wie von Gei¬ 
sterhand erscheinen die vier Buchsta¬ 
ben »DIR«. Tippen Sie jetzt ein »C« und 
dann noch einmal Fl. Auf dem Bild¬ 
schirm steht der gültige Befehl: 

A > DIR C: 

Sobald Sie die ENTER-Taste betätigen, 
wird der Befehl genauso ausgeführt, als 
hätten Sie ihn vollständig eingegeben. 
Merken wir uns also: Fl kopiert ein 
Zeichen von der aktuellen Cursorposi¬ 
tion aus der alten Zeile in die neue. 
Für den Fall, daß Sie in einer langen 
Eingabezeile nur ganz am Ende ein 
paar Zeichen korrigieren wollen, ist na¬ 
türlich das Kopieren von Zeichen mit 
der Fl-Taste eine äußerst mühsame und 
zeitaufwendige Sache. Aber Microsoft 
hat vorgesorgt. Denn durch Drücken 


der Funktionstaste F3 wird der kom¬ 
plette Eingabepuffer der alten Zeile ab 
der Cursorposition in die neue Zeile 
kopiert. Sie können sich dann mit DEL 
an die fehlerhafte Stelle von rechts her¬ 
antasten und sie ausbessem. Entweder 
mit F3 oder mit Fl fugen Sie dann bei 
Bedarf den Rest der alten Zeile wieder 
hinzu. 

Auch eine rudimentäre Suchfunktion 
ist im Zeileneditor von MS-DOS vor¬ 
handen. Sie betätigen dazu die Funk¬ 
tionstaste F3 und die Taste des gesuch¬ 
ten Zeichens. Bis zu der Stelle, an der 
das Zeichen im Puffer der alten Zeile 
gefunden wird, kopiert MS-DOS die 
alte Zeile in die neue. Was sich viel¬ 
leicht furchtbar kompliziert anhört, ist 
wirklich simpel. Beispielsweise könn¬ 
ten Sie diese Zeile eingetippt haben, de¬ 
ren eigentliche Funktion jetzt noch völ¬ 
lig unwichtig ist: 

A>COPY A:*.SOC B: 

Nun meldet MS-DOS einen Fehler, 
weil es keine Dateien mit der Namens¬ 
erweiterung ».SOC« findet. Sie haben 
sich aber nur vertippt und meinten ei¬ 
gentlich ».DOC«. Natürlich können Sie 
sich mit Fl oder F3 an die zu editieren¬ 
de Stelle herantasten. Aber versuchen 
Sie einmal etwas anderes: Sobald der 
Cursor wieder erscheint, betätigen Sie 
die Funktionstaste F2 und danach »S«. 
Der Computer baut die Zeile so auf: 

A>COPY A:*. 

Jetzt können Sie ohne Schwierigkeiten 
das »D« eingeben und mit der Funk¬ 
tionstaste F3 den Rest der Zeile ko¬ 
pieren: 

A>COPY A:*.DOC B: 

Manchmal gibt man eine Zeile ein und 
merkt kurz vor dem Drücken der 
ENTER-Taste, daß man doch lieber den 
alten Befehl aus der letzten Zeile wie¬ 
derholen möchte — eventuell mit Ab¬ 
wandlungen. MS-DOS ist darauf einge¬ 
richtet. Durch Betätigen der ESC-Taste, 
die auf dem Keyboard links neben der 
»1« liegt, brechen Sie die Bearbeitung 
der aktuellen Zeile ab. MS-DOS 
schreibt einen umgekehrten Schräg¬ 
strich auf den Bildschirm und beginnt 
eine neue Zeile, die noch leer ist. 


Durch Drücken von Fl oder F3 holen 
Sie den Inhalt der vorhergehenden 
Kommandozeile zurück. 

Bis jetzt haben wir einzelne Buchstaben 
ausgetauscht oder ans Ende der Zeile 
angehängt. Soll aber ein Buchstabe ein¬ 
gefügt werden, kamen wir mit unserer 
bisherigen Technik nicht weiter. Sobald 
Sie aber die INS-Taste drücken, die un¬ 
terhalb des Zehnerblocks auf der Tasta¬ 
tur liegt, schaltet MS-DOS in den Ein- 
fügemodus um. 

Technisch gesehen passiert danach 
beim Editieren folgendes: Der interne 
Cursorzeiger wird bei der Eingabe von 
Zeichen nur in der aktuellen Bild¬ 
schirmzeile weiterbewegt, in der im 
Speicher gepufferten alten Zeile aber 
nicht. Den Effekt, den das hat, werden 
Sie gleich erkennen: 

Sie haben den Text »DONAUSCHIF¬ 
FAHRT« eingegeben, mit dem MS- 
DOS natürlich nichts anfangen kann: 

A > DONAUSCHIFFAHRT 
Befehl oder Dateiname falsch 

Nun wollen Sie den Text ein bißchen 
abwandeln. Siedrücken fünfmal auf die 
Fl-Funktionstaste. Der Bildschirm 
sieht dann so aus: 

A> DONAU 

Nun betätigen Sie die INS-Taste im 
Zehnerblock und schreiben »DAMPF«: 

A> DONAUDAMPF 

Wenn Sie jetzt F3 drücken, um den Rest 
der alten Zeile zu kopieren, wird das 
ganze Wort »SCHIFFAHRT« über¬ 
tragen: 

A > DONAUDAMPFSCHIFFAHRT 

Damit kann MS-DOS zwar genauso 
wenig wie mit »SCHIFFAHRT« anfan¬ 
gen, aber das Übungsbeispiel hat sein 
Ziel erreicht. 

Zwei zum Editieren von Kommando¬ 
zeilen wichtige Funktionstasten haben 
wir Ihnen bisher unterschlagen. Es han¬ 
delt sich dabei um F4 und F5. 

Die Taste F4 ist sozusagen die Umkeh¬ 
rung von F2. Sie löscht im internen un¬ 
sichtbaren Puffer alle Zeichen bis zu ei¬ 
nem bestimmten Zeichen. Nehmen wir 
wieder unser Schiffsbeispiel. Sie wol¬ 
len aus dem Wort »DONAUDAMPF- 
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DAS PROFESSIONELLE CAD-SYSTEM 

GRAFRAD 3 

FÜR DEN J OY E PCW 8256 UND PCW 8512 



■ Frei wählbarer Zeichensatz 

■ Freiwählbarer Cursorsprung 

■ Maßstabgerechtes Erstellen 

■ 16 verschiedene Linientypen 

von Zeichnungen 

■ 16 verschiedene Schriftarten 

■ Maßeinheiten können angegeben 

■ Dehnen, kippen, rotieren, kopieren 

werden 

■ Verschieben und löschen aller 

■ 16 verschiedene Zeichnungsebenen 

Symbole, Texte, Objekte 

■ Symbolbibliotheken können angelegt 

■ Vergrößern und verkleinern 

werden 

■ Abrunden von Kanten 

■ Stufenlose Zoomfunktionen 

■ Automatisches Bemaßen 

■ Freiwählbares Raster 

■ Schraffieren 


Die Sensation: 

DM 549.- 

Verkaufspreis inclusive 1 Grafiktablett, 1 Soft¬ 
ware G3,1 Interface, 1 Zeichenstift 

PiZie-Data, H.-J. Piorreck 
Mittelstraße 61, Tel. 02339/71 91 
4322 Sprockhövel 2 
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O Hiermit bestelle ich per Nachnahme/Vorkasse 
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SCHIFFAHRT« die kürzere Bezeich¬ 
nung »SCHIFFAHRT« machen: 

A > DONAUDAMPFSCHIFFAHRT 
Befehl oder Dateiname falsch 

Das Wort »SCHIFFAHRT« beginnt mit 
einem »S«. Es ist glücklicherweise das 
erste und einzige »S« der Zeile. Sonst 
ließe sich diese Technik nicht so einfach 
anwenden. Betätigen Sie jetzt einmal 
die Taste F4 und drücken Sie dann »S«. 
Auf dem Bildschirm hat sich noch gar 
nichts getan. Erst wenn Sie den 
Befehlspuffer mit der F3-Taste in die 
sichtbare Kommandozeile kopieren, 
wird der Unterschied erkennbar: 

A> SCHIFFAHRT 

Das Handbuch zum Schneider PC 1512 
enthält in dieser Beziehung übrigens ei¬ 
nen gravierenden Fehler. Denn auf der 
Seite 306 hat man irrtümlicherweise 
der F3-Taste die Aufgabe von F4 über¬ 
tragen, was verständlicherweise nicht 
klappen kann. 

Vorhin wurde gesagt, daß sich die Edi¬ 
tiermöglichkeiten für die gerade einge¬ 


gebene Zeile im wesentlichen auf die 
Handhabung von DEL beschränken. 

So stimmt das natürlich nicht, wenn Sie 
sich die bisher beschriebenen Tasten¬ 
kombinationen ins Gedächtnis rufen. 

Allerdings haben alle diese den Nach¬ 
teil, nur zusammen mit der besagten 
vorhergehenden Zeile benutzt werden 
zu können. Man müßte... richtig, man 
braucht eine Tastenkombination, die 
die aktuelle Zeile in den Puffer für die 
alte Zeile kopiert, damit man alle Edi¬ 
tieroperationen bequem durchführen 
kann. Dafür ist die Funktionstaste F5 
vorgesehen. Sie kopiert die Zeile um 
und zeigt dann einen Klammeraffen als 
Bereitschaftssymbol sowie eine leere 
Zeile an. 

Jetzt ist es auch kein Problem mehr, die 
folgende Zeile zu korrigieren: 

A > ERASR C*EXE 

Sie hätte ja eigentlich so heißen sollen: 

A>ERASE C*.EXE 

Statt daß Sie also in der obigen Zeile 


ENTER drücken, betätigen Sie F5: 
A> ERASR C*.EXE§ 

Drücken Sie nun viermal Fl, so daß der 
Bildschirm wie folgt aussieht: 

A> ERASR C*EXE§ 

ERAS_ 

Jetzt tippen Sie das korrekte »E« ein und 
überschreiben damit automatisch das 
fälsche »R«: 

A> ERASR C*EXE§ 

ERASE_ 

Mit F3 hängen Sie nun den Rest der 
Zeile wieder an die Zeichen an: 

A> ERASR C*.EXE§ 

ERASE C*.EXE_ 

Und ENTER bewirkt, daß Ihr Befehl 
von MS-DOS interpretiert wird. 
Damit sind wir wieder am Ende eines 
Teils unserer Serie »Von CP/M zu MS- 
DOS« angelangt. Im nächsten Heft geht 
es weiter. 

(M. Kotulla) 


FARBFERNSEHGERÄT FÜR NUR DM 266! 

Jetzt erhalten alle Besitzer von RGB- und BAS-Fernsehmonitoren 
volle Farbfernseh-Möglichkeiten dank des verblüffenden 
»SCREENVISION« Systems. An Ihren Monitor wird mit einem ein¬ 
fachen Kabel ein hochentwickelter Tuner angeschlossen, so daß! 
Ihr Monitor einen doppelten Zweck erfüllt, als Spezialmonitor für 
Ihren Computer und als Farbfernsehgerät 
Am Monitor selbst sind keine Änderungen erforderlich. Die Be¬ 
sitzer von Schneider Computern benötigen kein zusätzliches Ka¬ 
bel, da der Monitor direkt an das SCREENVISION System ange¬ 
schlossen wird Nachstehend die besonderen Merkmale: 


* Äußerst schmaler FS-Tuner in modernster Konstruktion und Ausführung 

* Eingebauter RGB- und BAS-Ausgang 

* Acht Vorwahl-Tasterkanäle für VHF(UKW)- und UHF-Empfang 

* LED Zustandsanzeige 

* Eingebaute automatische Frequenz- und Verstärkungsregler 

* Regler für Helligkeit, Kontrast, Farbe und Tonstärke für den Benutzer 
' Eingebauter Tonausgang mit Phonoanschluß für HiFi 

* Eingebautes Netzgerät, voll isoliert, daher absolut sicher, plus Netzhilfsausgang am Tuner zum direkten Anschluß 
des Monitors 

* Möglichkeit zum direkten Anschluß Ihres Videorecorders an SCREENVISION zur Wiedergabe auf dem Monitor 
Ihres Computers 

' Anschluß an die meisten linearen RGB- oder BAS-Fernsehmonitore 

SCREENVISION trägt eine volle Garantie und ist direkt vom Hersteller zu besonders gün¬ 
stigen Preisen lieferbar, Lieferzeit nach Erhalt der Zahlung normalerweise 4 Tage per Luft¬ 
post Seit Einführung des Systems im September 1986 wurden bereits über 4000 
SCREENVISIONS exportiert 



BESTELLUNG 

Per Post — Übersendung der Zahlung, um 
den Versand zu beschleunigen, unter deut¬ 
licher Angabe von Name und Anschrift 

Per Telefon - Durch telefonische Angabe Ih¬ 
rer Kreditkartennr. und des Verfalldatums; 
Versand am selben Tag 
Per FS - Übersendung Ihres Auftrages zur 
sofortigen Bearbeitung, 



SCREENS MICROCOMPUTERS & ELECTRONICS LTD 


MAIN AVENUE, MOOR PARK, N0RTHW00D, MIDDLESEX, ENGLAND 

TELEFON: (+44) 9274 20664 FERNSCHREIBER: 923574 ALACOL G 



VISA 


Wir nehmen auch Aufträge von Händlern und Großau^räge an 
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Testbericht: 

VORTEX- 

Drive-Ccsrd 


Unser Leser Hans Kleiner betreibt seit 
einiger Zeit die Vortex-Drive-Card mit 
seinem Schneider PC. Hier sein Erfah¬ 
rungsbericht nach ungefähr 6-wöchiger 
Arbeit mit der Festplatte. 

Mit den Abmessungen 40x19x12 (l,b,h) 
und einem Gewicht von ca. 1 kg hatte 
ich den Gegenwert von DM 1398.- auf 
meinem Tisch stehen. Der Inhalt be¬ 
stand aus 

— 1 Styroporbehälter mit der Card, 

— 1 Diskette 5 1/4 Zoll (7 Files), 

— 1 DIN-A5-Installations-Handbuch 
(12 Seiten) und 

— 1 DIN-A4-Installations-Anweisung 
(GEM-Installation, 5 Seiten). 

Ich will Euch jetzt zuerst etwas über die 
Daten zur Vortex-Card erzählen, bevor 
ich zur Installation und der eigentlichen 
Erfahrung während meiner Arbeit mit 
der Card komme. 


Vortex-Card: 

Vor der Auflistung der technischen Da¬ 
ten, die ich dem Installationshandbuch 
von Vortex entnommen habe, will ich 
zwei Punkte herausgreifen, die wohl 
allgemein mit Skepsis betrachtet wer¬ 
den. Dies sind einerseits die »Lei¬ 
stungsaufnahme« und andererseits die 
»Stoßfestigkeit« der hier besprochenen 
Vortex-Card. 

Ich zitiere in Stichworten frei nach Vor¬ 
tex: »Eine Erweiterungssteckkarte für 
IBM-PC und Kompatible, besonders 
für Schneider PC«. 

Warum »besonders ....« ? Weil der 
Schneider PC mit seinem Netzteil et¬ 
was schwach dimensioniert wurde und 
es laut Aussage vieler Händler und 
»Experten« ein Wagnis sei, mit einer 
Festplatte oder auch einer Drive-Card 
die Stromversorgung zusätzlich zu be¬ 
lasten. Einige waren sogar der Mei¬ 
nung, es würde nur Schwierigkeiten ge¬ 
ben! Wurde mir persönlich — und nicht 
nur einmal — versichert. 

Nicht mit der Vortex-Card! Genau hier 
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liegt die Bedeutung des »besonders...«, 
denn Vortex hat es geschafft, eine Card 
anzubieten, die selbst beim Schneider 
KEINERLEI PROBLEME macht mit 
seiner Netzteil-Belastung! Ich denke, 
daß ich nach beinahe 6 Wochen inten¬ 
sivem Betrieb diese Aussage darüber 
machen kann, denn in dieser Zeit pro¬ 
bierte ich so manches Programm aus, 
das meinen PC »aussteigen« ließ (Tests 
von zum Teil nicht-kompatiblen As¬ 
semblerprogrammen) und ich den 
Rechner nur noch ab- und wieder ein¬ 
schalten konnte. Also, weder die 
Hochlauf-Leistungsaufnahme (20 Watt) 
noch die Leistungsaufnahme beim 
Dauerbetrieb (14 Watt) beeinträchtigt 
die Arbeit mit dem Schneider PC zu¬ 
sammen mit der Vortex-Card! 

Zu diesem Punkt gehört noch die Wär¬ 
meentwicklung. Ich habe am Anfang 
(die ersten beiden Tage nach Inbetrieb¬ 
nahme der Card) immer die hintere Ge¬ 
häuseabdeckung ein wenig offengelas¬ 
sen, um möglichen Hitze-Staus vorzu¬ 
beugen. Aber ein Gespräch mit Vortex 
und die seither geübte Praxis haben mir 
bestätigt: man kann den Deckel ruhig 
zulassen. Die Wärmeentwicklung ist 
nicht so groß, als daß sich Laufwerks- 
Unregelmäßigkeiten bzw. Schwierig¬ 
keiten einstellten. Und der Rechner 
läuft jeden Abend etwa 5 Stunden und 
am Wochenende mehr als 8 Stunden 
täglich im Dauerbetrieb! 

Der zweite »kritische« Punkt in den Au¬ 
gen vieler meiner »Berater« war die 
Stoßfestigkeit. Nun, wenn die techni¬ 
schen Daten gleich folgen, kann zwar 
abgelesen werden, daß Schock- und Vi¬ 
brationswerte »beachtlich« sind, aber 
wie lassen sich diese Werte »verste¬ 
hen«? Das schon erwähnte Gespräch 
mit Vortex gab auch hier Aufschluß: 
Mit diesen Laufwerken wird selbst bei 
Daimler Benz (!!!) auf der Versuch¬ 
strecke gearbeitet, wo es darum geht, 
auch bei hoher mechanischer Belastung 
noch einwandfreie Meßergebnisse zu 
erhalten und zu speichern. Das sagt 
mehr als ein Wert von z.B.: Schock von 
10G für 11 ms beim Betrieb, ohne 
Schaden. 

Die 3,5-Zoll Festplatte (2 Platten mit 4 
Oberseiten) weist folgende Daten auf: 


- Anzahl Köpfe: 4 

- Spuren/Zoll: 804 tpi 

- Spurabstand: 0,00124 Zoll 

- Anzahl Zylinder: 615 Daten-Zl. 

- Kopfpark-Zyl.: #663 

- Anzahl Spuren: 2460 

- Plattendrehzahl: 3568 UPM+/- 5% 

- Mitt!.Latenz-Zt.: 8,41 ms 

- Motor-Hochl.Zt.: typ 15 ms 

- Such/.. Spur/Spur: 3 ms 

- Kopfber.Zeit: 15 ms 

- Mittl.Zugr.Zeit: 80 ms 

(incl. Kopfber.) 

- max. Zugr.-Zt.: 195 ms 

- Datcnübertr Rate 5 Megabit/sec. 

- Kapazität (unf.): 25,5 MegaByte 

- Kapazität (form): 21.2 MegaByte 

- Interface: ST 506 

- Temp. (Betrieb): 4-50 Grad Cels. 

- Temp. (Ruhe): —40 bis 60 Grad 

- Rel. Luftfeucht.: 8-80% unkond. 


— Schock Betrieb 

kein Einfluß: 

10G für 11 ms 

- Schock Betrieb 

ohne Schaden: 

20G für 11 ms 

- Schock Transport 

Kopf geparkt: 

40G für 25 ms 

- Vibration 

Betrieb: 

0,048 Zoll 

Doppelamplitude 

(5-17 Hertz) 

0,73G, 17-150Hz 

0,3 3 G,200-500Hz 

- Vibration Ruhe: 

1,0G, 5-200 Hz 

- Leistungsaufnahme 

(Hochlaufen): 

20 Watt 

(Betrieb): 

14 Watt 

— Gewicht: 

1120 Gramm 


MS-DOS-Installation: 

Kommen wir jetzt zur Installation und 
der Inbetriebnahme der Vortex-Card. 
In Händen hielt ich die Card, eine Dis¬ 
kette und zwei Beschreibungen. Zu¬ 
sätzlich brauchte ich lediglich einen 
Kreuzschlitz-Schraubendreher, wie 
sich gleich herausstellen sollte. Nach¬ 
dem ich die Card aus ihrer luftdichten 
Hülle ausgepackt (sie war außerdem 
mit einem dicken Styropor-Behältnis 
umhüllt) und dann neben mich gelegt 
hatte, nahm ich das DIN-A5-Installa¬ 
tions-Handbuch — wohin wohl — in 
die Hand natürlich, es heißt ja so. Auf 
den ersten drei Seiten wird ein wenig 
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über die Card geplaudert (das ist gut so, 
es nimmt dem Unerfahrenen etwas die 
Scheu vor dem Ganzen). Auf den Sei¬ 
ten 4 und 5 wird einmal für einen »be¬ 
liebigen« PC und einmal speziell für 
den Schneider-PC gesagt und in 5 Bil¬ 
dern (auf Seite 5+6) anschaulich ge¬ 
zeigt, wie die Installation hardwaremä¬ 
ßig abläuft. 


Für den Schneider sieht das so aus: 


— Netzstecker ziehen; 

— Hintere Gehäuseabdeckung nach 
hinten wegschieben (nachdem der 
Monitor entkabelt und abgenommen 
worden ist, das kennt man ja schon 
von der PC-Installation); 

— Entfernen der hintersten rechten 
Schraube (letzter Einschub); 


- Einsetzen der Card und wieder Ein¬ 
drehen der Schraube, die nun sicher¬ 
stellt, daß die Card fest in dem Ein¬ 
schub verankert ist. Übrigens: Die 
Einsteck-Karte paßt wirklich ins 
Schneider- Gehäuse. Es erübrigt 
sich — wie bei manch anderen 
Drive-Cards - daß Befestigungsbü¬ 
gel zusätzlich vom Kunden ange¬ 
bracht werden müssen. Auch sonsti¬ 
ge »Anpassungen« wie das Biegen 
von Metallteilen an der Karte oder 
andere ähnliche Aktionen sind nicht 
nötig! 


— Gehäuseabdeckung wieder an ihren 
Platz schieben; 

— Monitor wieder aufsetzen und an¬ 
schließen sowie Netzstecker wieder 
einstecken. 

Das war alles, soweit es die Hardware 
anbelangt. 

Zur Installation von MS-DOS unter 
MS-DOS nun liefert Vortex auf den 
Seiten 7, 8 und 9 so präzise Anweisun¬ 
gen, daß es eigentlich UNMÖGLICH 
IST, etwas falsch zu machen. Schritt für 
Schritt erklärt hier der Autor des Hand¬ 
buchs, wie mit Diskette 1 (MS-DOS 
3.2) der von Schneider zu dem PC mit¬ 
gelieferten Disketten und den darauf 
befindlichen Programmen FDISK und 
FORMAT sowie der residenten MS- 
DOS-Utility COPY die ganze Installa¬ 
tion des MS-DOS 3.2 auf die Hard- 
Disk durchgeführt wird. Auf Seite 9 un¬ 
ten angelangt (es waren insgesamt nur 
wenige Eingaben nötig gewesen, um 
den gesamten Vorgang, der auf den Sei¬ 
ten 8 und 9 geschildert wird, abzu¬ 
wickeln), steht nun die Card einsatzbe¬ 
reit zur Verfügung. Das heißt, daß beim 
nächsten Kaltstart (ALT+CTRL+DEL) 
von der Platte »gebootet« wird, wenn 
im Disketten-Laufwerk A keine Sy¬ 
stemdisketteeingelegt ist. Auf der Plat¬ 
te befinden sich sowohl das Betriebs- 
System MS-DOS 3.2 (nicht DOS 
PLUS!) als auch alle Programme, 


Abbildung 2: Erstes Booten nach MS-DOS-Installation 



AMSTRAD PC 640k Cvl) 05 j 24 am 29 November 1986 
(c)1986 AMSTRAD Consumer Electronics plc 


Microsoft RAMDrive Version 1.16 Virtuelle Diskette D: 
Diskettengrößea 34k 
Sektorgröße: 128 bytes 
Zuordnungseinhei ts 1 sectors 
Verzeichnis Einträge: 64 

OECHO OFF 

- MOUSE Geräte Treiber v5.00 installiert- 

21213184 Bytes verfügbarer Platz auf Diskette 
47104 Bytes in 2 versteckte Dateien 
2048 Bytes in 1 Verzeichnisse 
329728 Bytes in 43 Benutzerdateien 
20834304 Bytes frei auf der Diskette 

655360 Bytes Speicherplatz insgesamt 
559296 Bytes frei . 

C:ö> 


I 
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Batch-Files und Treiber, die auf Disket¬ 
te 1 des PC-Lieferumfangs auch enthal¬ 
ten sind. 


GEM-Installation: 


Während die MS-DOS-Dateien noch 
»zu Fuß« von der Diskette (1) auf die 
Platte kopiert werden müssen, hat sich 
Vortex für die GEM-Installation etwas 
einfallen lassen: für die verschiedenen 
Konfigurationen (Hardware-Ausstat¬ 
tung) werden auf der von Vortex mitge¬ 
lieferten Diskette sogenannte »Batch- 
Files« zur Verfügung gestellt. 

Nach dem Einlegen der Diskette und 
dem Start des Batch-Files, der auf die 
eigene Konfiguration paßt, erledigt der 
Job (Batchfile) die ganze Arbeit mit 
Hilfe eines einfachen und gut verständ¬ 
lichen Dialogs mit dem Bediener. Das 
Ganze ist dem Aufwand nach so mini¬ 
mal, daß die Beschreibung auf 2,5 
locker geschriebenen DIN-A4-Seiten 
Platz findet. 


Parken der Card: 


Die Schreib~/Leseköpfe der Card ste¬ 
hen normalerweise immer über den zu¬ 
letzt bearbeiteten Platten-Spuren. Um 
nun die Platte zu schonen, wenn die 
Station ausgeschaltet ist (nur, wenn Ge¬ 
fahr besteht, daß der Computer des öf¬ 
teren »gestoßen« wird) oder der Com¬ 
puter transportiert werden soll, liefert 
Vortex auf der Diskette neben den sechs 
Installations-Files auch ein Programm 
»PARK.COM« mit. Dessen alleinige 
Aufgabe ist es, den Schreib-/Lesekopf 
auf die »Park-Spur« 663 zu positionie¬ 
ren. Dort befinden sich keine Daten auf 
der Platte, so daß durch Stöße und 
Schocks keine Plattenbeschädigungen 


Abbildung 3: Inhalt der mitgelieferten 
Vortex-Diskette 


Volume 

ln Laufwerk 0 

hat keinen 

Namen 

Verzeichnis von 

B:ö 



GEMINIT1 

BAT 

60 

16. I 1.86 

14.13 

GEMINIT2 

BAT 

60 

16.11.86 

14.23 

DISC1 


499 

16. 1 1.86 

14. 17 

DISC2 


528 

15.11.86 

11.15 

INI T1 

BAT 

4963 

16.11.86 

14.58 

INIT2 

BAT 

4963 

16.11.86 

14.59 

PARK 

COH 

512 

16.11.86 

16.16 


7 Datei(en) 

347136 Bytes frei 


und somit Datenverluste entstehen 
können. 

Dieses Programm braucht sicherheits¬ 
halber also wirklich nur dann gestartet 
werden, wenn dem Laufwerk nach dem 
Ausschalten heftige Stöße drohen - 
aber wirklich nur dann. Dies hat mir 
einerseits Vortex versichert, anderer¬ 
seits spricht ja das oben erwähnte Ein¬ 
satzgebiet bei Daimler Benz seine eige¬ 
ne Sprache. 

Um den Handgriff des Startens von 
PARK-COM so bequem wie möglich 
zu machen, belädt man dieses Pro¬ 
gramm am besten in der Root- 
Directory (etwa zusammen mit AU¬ 
TOEXEC.BAT, CONFIG.SYS und 
COMMAND.COM, alle anderen Files 
sind ja der Übersicht halber in verschie¬ 
denen »sprechenden« Subdirectories 
untergebracht). Dann genügt es, PARK 
einzugeben und schon steht die Fertig¬ 
meldung von Vortex auf dem Schirm. 
Ich habe PARK.COM einfach in 
ENDE.COM umbenannt, so daß ich 
am Ende meiner Arbeit nur ENDE ein¬ 
geben muß, wenn die Möglichkeit be¬ 
steht, daß zum Beispiel meine Frau an¬ 
schließend in der Nähe des Computers 
beschäftigt ist und möglicherweise 
schon mal heftiger an den Tisch stößt, 
als für die Platte gut ist. 


Zusammenfassung: 


— Die Lieferung von Vortex erfolgt in 
einer guten und sicheren Ver¬ 
packung. 

— Der Preis steht mit DM 1398, — si¬ 
cherlich in einem zuerst günstigen 
Verhältnis zur Leistung. 

- Die mitgelieferten Unterlagen sind 
ausreichend und klar abgefaßt. 

- Die Installation ist ein Kinderspiel - 
sowohl hardwaremäßig (es paßt al¬ 
les, es muß nichts gebogen, gedrückt 
oder geschoben werden) — als auch 
softwaremäßig. 

- Die Spitze der Leistungsaufnahme 
beim Hochlaufen (6 Watt mehr als 
beim Normalbetrieb) wird ohne 
sicht- oder spürbare Probleme' ver¬ 
kraftet. 

— Die Schreib-/Leseköpfe werden bei 


»längeren« Pausen nicht ständig in 
Ruheposition gebracht und müssen 
deshalb auch nicht ständig zum Ort 
des Geschehens hinpositioniert wer¬ 
den, obwohl sie möglicherweise 
kurz vorher noch dort gestanden 
haben. 

- Das Laufgeräusch ist zwar hörbar, 
liegt aber in einem durchweg akzep¬ 
tablen Bereich. Es ist jedenfalls lan¬ 
ge nicht so unangenehm und so laut 
bis störend wie die Lüftungsventila¬ 
toren anderer PC’s. 

- Eindeutige Geschwindigkeitsvorteile 
gegenüber 5 1/4 Zoll-Platten sind 
spürbar festzustellen (ich arbeite in 
meinem Beruf mit allen möglichen 
Laufwerken, kann also durchaus 
vergleichen). 

- Einziger, für mich zwar nicht ent¬ 
scheidender, aber vielleicht doch der 
Anregung dienender Nachteil ist das 
Fehlen (als Zugabe?) einer guten und 
sauberen Backup-Utility. 

- Über ein mögliches Segmentieren 
der Platte verliert Vortex kein Wort. 
Ob dies möglich ist oder nicht oder 
aber es einfach nur vergessen wor¬ 
den ist, zu erwähnen, weiß ich nicht. 
Ich brauche es nicht, da ich in 99 % 
aller meiner Fälle sowieso mit MS- 
DOS 3.2 boote, und das ist ja als Sy¬ 
stem installiert. Für den Fall, daß ich 
mit DOS-Plus arbeiten will, lege ich 
halt beim Booten die DOS-Plus- 
Diskette (# 4) ein und wechsle dann 
in die Directory auf Laufwerk C, in 
dem die DOS-Plus-Programme un¬ 
tergebracht sind. Für GEM braucht 
man DOS-Plus nicht, wenn man nur 
»normal« arbeiten will (keine CMD- 
Dateien, anderes FORMAT- und 
DISKCOPY-Programm). 

So, das war’s. Ich hoffe, den Lesern ei¬ 
nige Kriterien an die Hand gegeben zu 
haben, die mithelfen können, das Vor¬ 
haben einer Anschaffung mit genügend 
Information zu versorgen, die für einen 
solchen Entschluß unbedingt vorhan¬ 
den sein muß. Ich bin mit meiner Ent¬ 
scheidung, das Vortex-Laufwerk ge¬ 
kauft zu haben, zufrieden und habe bis 
heute keinerlei Mängel feststellen kön¬ 
nen. (H.Kleiner/SR) 
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★ hat das richtige Schriftbild für Anspruchsvolle 
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★ ist durchschlagend: Original plus 4 Kopien 
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Das Software-Experiment 

Folge 8: Die Leser haben das wort 



Der Computerfreak als Realitätsflüchtling, abgestumpft, kontaktarm und 
rettungslos versunken in der Scheinwelt seiner Videospiele — dieses Klischee 
wird von Kritikern der Computertechnologie gerne ins Feld geführt. Die Mi¬ 
kroelektronik ist wie jede technische Errungenschaft eine ausgesprochen 
zweischneidige Angelegenheit, und sicherlich ist es richtig, die Gefahren eines 
Mißbrauchs mit kritischer Aufmerksamkeit im Auge zu behalten. Überse¬ 
hen wird jedoch oft, wie viele Anwender ihre Maschine ausgesprochen kre¬ 
ativ nutzen - sei es als mathematische, grafische oder musikalische Expe¬ 
rimentierfläche - und eine Kontaktfreudigkeit entwickeln, die mitunter die 
PC International-Redaktion durch eine Flut von Briefen und Telefonanru¬ 
fen vor einige Probleme stellt. 


Sinn und Zweck des Software-Experi¬ 
ments war es, auf diese Entwicklung 
einzugehen und zu zeigen, wie einige 
besonders interessante Ideen der expe¬ 
rimentellen Mathematik und künstli¬ 
chen Intelligenz auf dem CPC realisiert 
werden können. Doch wir wollen die¬ 
se Serie nicht beenden, ohne unsere Le¬ 


ser zu Wort kommen zu lassen. Die 
Themen dieser Folge stehen repräsen¬ 
tativ für viele Zuschriften, die in der 
Redaktion eintreffen. Sie verdeutli¬ 
chen, daß sich die CPC-Besitzer kei¬ 
nesfalls auf das Abschießen außerirdi¬ 
scher Raumflotten und die dazugehöri¬ 
ge Highscore-Jagd beschränken! 



Wie Sie sich vielleicht noch erinnern 
können, wurden in der zweiten Folge 
des Software-Experiments sich selbst 
organisierende Systeme und Zellauto¬ 
maten behandelt. Eine besonders inter¬ 
essante und zudem grafisch sehr reiz¬ 
volle Variante dieses Themas haben wir 
Herrn Brinkmann aus Ankum zu ver¬ 
danken: 

Das Programm »Zellautomat« ist ein 
Hilfsmittel für die grafische Darstel¬ 
lung eindimensionaler Zellautomaten. 
Im Gegensatz zum Game of Life (sie¬ 
he CPC International 8/86), das sich 
auf einer Fläche ausbreitet, entwickelt 
sich der eindimensionale Zellautomat 
entlang einer Linie. Das Schicksal ei¬ 
ner Zelle in der folgenden Generation 
wird dabei vom Zustand der linken und 
rechten Nachbarzelle und der betrach¬ 
teten Zelle bestimmt. Indem man Ge¬ 
neration auf Generation untereinander 
anordnet, ist es möglich, die ganze Ent¬ 
wicklung in einem Bild sichtbar zu ma¬ 
chen. Die Logik bzw. die Regeln des je¬ 
weiligen Zellautomaten können vom 
Benutzer frei definiert werden. 


Die Zellen (hier 320 pro Zeile) können 
die Werte 0, 1, 2 und 3 annehmen und 
werden auf dem Bildschirm durch ei¬ 
nen Punkt in der entsprechenden INK- 
Farbe dargestellt. Um die nächste Ge¬ 
neration zu berechnen, sind jeweils drei 
nebeneinander liegende Werte zu ad¬ 
dieren. Dem Ergebnis wird in einer Zu¬ 
weisungstafel eine Zahl zugeordnet, die 
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den Zustand der mittleren Zelle in der 
nächsten Generation bestimmt. Dazu 
ein Beispiel: 


Summe der drei Zellenwerte 


0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

0 

3 

1 

0 

2 

0 

2 

3 

1 

3 


neuer Wert der mittleren Zelle 


Bild 1 zeigt, wie sich diese Zuweisungs¬ 
tafel grafisch auswirkt. Das angegebe¬ 
ne Beispiel ist der Zellautomat, der 
auch nach dem Start des Programms zu 
Verfügung steht. Da die obere Zeile 
der Tabelle immer gleich bleibt, wird 
durch die Angabe der unteren Zeile der 
Zellautomat vollständig definiert. The¬ 
oretisch sind 4 10 (mehr als 1 Million;) 
verschiedene Zuordnungen denkbar; 
davon sind allerdings die meisten un¬ 
interessant. Solche Zellautomaten kön¬ 
nen nicht nur hübsche Grafiken erzeu¬ 
gen, sondern auch als Modell für phy¬ 
sikalische Prozesse wie z.B. turbulente 
Strömungen dienen. Ebenso vermutet 
man, daß einige der eindimensionalen 
Zellautomaten genau wie das Game of 
Life universale Rechner sind. 

Und jetzt einige Hinweise zur Bedie¬ 
nung: Nach dem Start des Programms 
erscheint am oberen Bildrand ein Pfeil, 
am unteren Bildrand die x-Position die¬ 
ses Pfeils, und der Computer erwartet 
die Eingabe der Anfangspunkte. Wird 
die COPY-Taste gedrückt, so erscheint 
direkt über dem Pfeil in der obersten 
Bildschirmzeile ein Punkt in der INK- 
Farbe 1. Durch mehrmaliges Drücken 
erhält er dann die Farbe 2,3 oder wird 
gelöscht. Der Pfeil selbst wird durch 
die Cursortasten < links > bzw. 
< rechts > gesteuert. Nach der Einga¬ 
be der Anfangspunkte können Sie den 
Zellautomaten mit der ENTER- bzw. 
RETURN-Taste starten. Der Aufbau 
des Bildes läßt sich jederzeit durch das 
Drücken einer beliebigen Taste unter¬ 
brechen, und Sie gelangen in ein klei¬ 
nes Menue. Hier stehen die folgenden 
drei Punkte zur Verfügung: 

W)eiter: Die Ausgabe eines begonne¬ 
nen Bildes wird fortgesetzt bzw. die 
Ausgabe der nächsten 180 Generatio¬ 
nen begonnen. 


N)eustart: Hier gelangen Sie wieder in 
den Eingabemodus für die Anfangs¬ 
punkte. 

U)mdefmieren: In diesem Unterpunkt 
können Sie ein neues Logikmuster de¬ 
finieren, indem Sie wie oben erklärt die 
untere Zeile der Zuweisungstafel ohne 
Kommas und Zwischenzeichen ein¬ 
geben. 

Mit der selbst zu definierenden Zuwei¬ 
sungstafel und den Anfangsbedingun¬ 
gen sind geradezu unerschöpfliche Ex¬ 
perimentiermöglichkeiten gegeben. 
Abschließend noch einige interessan¬ 
te logische Muster zum Ausprobieren: 


0 

2 

3 

0 

1 

0 

3 

2 

3 

1 

0 

2 

3 

0 

2 

1 

3 

2 

3 

1 

0 

2 

1 

1 

3 

3 

2 

2 

0 

3 

0 

2 

1 

1 

0 

3 

2 

0 

1 

3 

0 

1 

2 

1 

3 

0 

2 

3 

2 

2 

0 

1 

2 

1 

3 

1 

0 

0 

0 

0 


Literatur: Stephen Wolfram, Softwa¬ 
re für Mathematik und Naturwissen¬ 
schaften; Spektrum der Wissenschaft, 
Sonderheft Computer-Software. 


Neue Klänge mit dem CPC 


Nicht so groß wie erhofft war leider die 
Resonanz auf unsere Anregung in der 
ersten Folge, Methoden und Program¬ 


me zu erfinden, die mathematische 
Strukturen auf dem CPC nicht sichtbar, 
sondern hörbar machen. Das ist eigent¬ 
lich verwunderlich, da schon die einfa¬ 
chen Grundlagen der Musiktheorie vol¬ 
ler Mathematik sind. Herr Winkel¬ 
mann aus Hannover zeigt in dem fol¬ 
genden Beitrag, wie sich mit dem 
Computer auf mathematische Weise 
neue Wege der Klangerzeugung be¬ 
schreiten lassen, für die konventionel¬ 
le Musikinstrumente gar nicht oder nur 
eingeschränkt benutzbar sind: 

Die gewohnte (europäische) Musik teilt 
eine Oktave in zwölf Schritte, die soge¬ 
nannten Halbtonschritte auf. Daraus er¬ 
gibt sich die Frage, ob man eine Okta¬ 
ve nicht auch in eine andere Anzahl von 
Schritten einteilen kann. Um diese Idee 
zu realisieren, muß man jedoch zu¬ 
nächst einmal wissen, mit welcher ma¬ 
thematischen Gesetzmäßigkeit sich die 
gewohnten Tonschritte berechnen las¬ 
sen. Bei der Oktave ist das noch relativ 
einfach; sie entspricht der doppelten 
Frequenz, somit muß also die Tonpe¬ 
riode im Soundbefehl (zweiter Parame¬ 
ter) halbiert werden. Dazu ein kurzes 
Beispielprogramm: 

100 IN PUT “Grundperiode: “,grund 

110 oktave=grund/2 

120 REM Grundperiode spielen 

130 SOUND 7,grund,200,7 

140 REM Oktave spielen 

150 SOUND 7,oktave,200,7 


Bild 1: So arbeitet der eindimensionale Zellautomat 
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Listing 3 






10 ’ 

*#######**#######*###*#####*#*##»## 

[1460] 

510 

GOSUB 670:GOTO 410 


[893] 

20 ’ 

»*« *** 

[51 ] 

520 

» 


[ 117] 

30 ’ 

*** ZELLAUTOMAT *** 

C1866] 

530 

’#** Umdefinieren *** 


[1093] 

40 ’ 

» # * » * * 

[51 ] 

540 

LOCATE 1,24:PR INT"akt. logisches 

Muste 

[44301 

50 ’ 

**# (C) 1986 by *** 

[9331 

r : 

"raus*" 



60 ’ 

*** *** 

[51] 

550 

LOCATE 1,25:PR INT"Gib logisches 

luster 

[4513] 

70 ’ 

*** Gerd Brinkmann *** 

[ 1985] 

ein : "STRING*(10,".">" " 



80 ’ 

*** 4554 Ankum *** 

C611] 

560 

LOCATE 28,25:INPUT"",a* 


[945] 

90 » 

*******»»#****##*#*****»«***«*»#*»* 

11460] 

570 

IF a*=""THEN 630 


[757] 

100 

• 

[117] 

580 

IF LEN(a*)>10 THEN 540 


[1438] 

110 

’*** Initialisierung *** 

[1272] 

590 

mus*=a*+STRING*(10-LEN(a*),"0") 


[1105] 

120 

DEFINT a-z:mus*="0310202313" 

[1740] 

600 

FOR 1=1 TO 10 


[315] 

130 

MEMORY 24999:s=0:G0SUB 760 

[657] 

610 

POKE 25025+6*1,VAL(MID*(mus*,i 

1) > 

12041] 

140 

POKE 30655,255 

[498] 

620 

NEXT 


[3501 

ISO 

INK 0,0:1NK 1,26:INK 2,17:1NK 3,9 

[1487] 

630 

LOCATE 1,24:PRINT SPCC38) 


[1364] 

160 

BORDER 0:PAPER 0 

[9791 

640 

GOTO 450 


C4421 

170 

SYMBOL 255,16,56,84,16,16,16,16,16 

C1607] 

650 

» 


[ 1171 

180 

PEN 1:PLOT -10,0,1 

[1993] 

660 

’#** UP: Anzeige *»* 


[1510] 

190 

MODE 1:x=322:gen=0:TAG 

[966] 

670 

PEN 2:LOCATE 1,24:PR INT"Log1k: " 

5 

[1944] 

200 

CALL 25155 

[312] 

680 

PEN 1:PR I NT mus*;:PEN 2 


[1721] 

210 

1 

[117] 

690 

PRINT" Gen. 


[11431 

220 

'** Anfangspunkte u.-färbe setzen ** 

[1512] 

700 

PEN 1:PRINT gen"-"gen+180;:PEN 1 


[2706] 

230 

MOVE x-8,395:PRINT CHR*(25S>; 

[2075] 

710 

LOCATE 1,25:PR INT SPC <39) 


[13721 

240 

IF INKEY (1)0-1 THEN IF x<614 THEN x = x 

[1215] 

720 

WHILE INKEY*<>"":WEND 


[1786] 

+ 2 



730 

RETURN 


[5551 

250 

1F INKEY(8)0-1 THEN IF x>24 THEN x = x- 

[2112] 

740 

’ 


[117] 

2 



750 

>**« M-Code *** 


[637] 

260 

IF INKEY(9)0-1 THEN GOSUB 310 

£ 14451 

760 

FOR adr=25000 TO 25166 


[1286] 

270 

IF INKEY<18)0-1 THEN MOVE x-6,395:PRI 

[2365] 

770 

READ a* 


C309] 

NT" 

";:TAGOFF:GOTO 370 


780 

v=VAL("&"+a*>:s=s+v 


£ 1633] 

280 

MOVE 100,30:PRINT"x : ”;x-2;:G0T0 230 

[2483] 

790 

POKE adr,w 


£ 136] 

290 

* 

[117] 

800 

NEXT 


[3501 

300 

’*** UP: Anfangspunkte plotten *** 

C2353] 

810 

IF s=12707 THEN RETURN 


[1255] 

310 

c=(TEST(x-2,399)+1)MOD 4 

[1670] 

820 

PR INT"Datafeh 1 er!":END 


[18791 

320 

PLOT x-2,399,c:POKE 30000+x/2,c 

C 1938] 

830 

DATA D5,21,30,75,11,7A,76,7E 


[12071 

330 

PLOT -10,0,1 

C 341 ] 

840 

DATA 23,86,23,86,12,2B,13,1A 


[14671 

340 

RETURN 

[555] 

850 

DATA FE,FF,28,02,18,F1,21,7A 


[ 1237] 

350 


[117] 

860 

DATA 76,7E,FE, FF, 28,3C,06,00 


[16623 

360 

’*** Hauptschleife *** 

[1012] 

870 

DATA FE,00,20,32,06,03,FE,01 


[10061 

370 

GOSUB 670:w=0 

[1060] 

880 

DATA 28, 2C, 06,01, FE, 02,28, 26 


[669 3 

380 

IF gen>0 THEN CALL 8-622E, 49152 

[904] 

890 

DATA 06,00,FE,03,28,20,06,02 


[12053 

390 

FOR i=1 TO 180 

£502) 

900 

DATA FE, 04,28, 1A,06,00,FE,05 


[19001 

400 

IF INKEY*<>""THEN 450 

£785] 

910 

DATA 28,14,06,02,FE,06,28,OE 


t10693 

410 

CALL 25000.49152+80#(i\8)+2048*(i MO 

[1653] 

920 

DATA 06,03,FE,07,28,08,06,01 


[19153 

D 8) 


930 

DATA FE,08,28,02,06,03,70,23 


[5753 

420 

NEXT:w = l 

[826] 

940 

DATA 18,BF,01,42,01,11,30,75 


[10583 

430 

f 

[1171 

950 

DATA 21,79,76,ED,BO,21,7A,76 


[9251 

440 

'#** Abfrage nach Ablauf o. Break *** 

£3442) 

960 

DATA 7E,FE,FF,28,18,06,00,FE 


[22791 

450 

LOCATE l,25:PRlNT"W)eiter N)eustart 

£5623] 

970 

DATA 00, 28,OF,06,10,FE,01,28 


CS91 ] 




980 

DATA 08,06,01,FE,02,28,02,06 


[11403 

460 

a*=UPPER*<INKEY*):IF a*=""THEN 460 

[18241 

990 

DATA 11,70,23,18,E3,Dl,21,7A 


[12753 

470 

IF a*="N"THEN 180 

[966] 

1000 DATA 76, 06,50,7E,07,23,86,07 


C 832 ] 

480 

IF a*="U"THEN 540 

[1272] 

1010 DATA 23,86,07,23,86,12,23,13 


£15333 

490 

IF a* < >"U"THEN 460 

[1039] 

1020 DATA 10,Fi,C9,3E,FF,21,30,75 


[16853 

500 

IF w THEN gen=gen+180:GOTO 370 

[1655] 

1030 DATA BE,C8,36,00,23,18,F9 


[10733 



Selbstbau-Plotter 

PL22/B 

Geschwindigkeit max.60mm/s - Auflösung 0,06 mm 
Genauigkeit besser 0,09 mm - Format DIN A3 
Mechanik: Ganzmetall, Linearkugellager, Schrittmotore, 
Zahnriemen, höchste Präzision, robuste Ausführung 
Prozessor: hochintelligenter Z80-Rechner, Centronics Schnittstelle 
Software: im 16 K-EPROM, 44! Neue Plottbefehle, z.B.: 3D-Grafik, 
3 Schriftsätze, 2-typen, Interpolation Zoomen, relatives/absolutes 
Positionieren usw. 

Weiteres: Gehäuse, Zeichenwerkzeuge, Netzteil usw 
Preis: Immer noch nur 619,95 DM {Mechanikbausatz) 
Neugierig geworden? - Info gegen DM 1,60 in Briefmarken bei 
(siehe Bericht in CPC 8/86 

Walter Kopisch 

Plotter und Grafiksysteme - Hard- und Software - 
Buchbergstraße 37 - D-7712 Blumberg 1 


Für unsere ständige Joyce-Rubrik suchen wir 
noch 

Programme 
Tips + Tricks 

zur Veröffentlichung. Honorar nach 
Vereinbarung. 

Einsendungen an: 

DMV Daten & Medien Verlagsges. mbH, 
Fuldaer Str. 6, 3440 Eschwege 
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160 REM Beide gleichzeitig 
170 SOUND l,grund,300,7 
180 SOUND 2,oktave,300,7 

Bei den Halbtonschritten ist die Be¬ 
rechnung auch nicht viel schwieriger, 
wenn man weiß, daß bei temperierter 
Stimmung zwischen den Frequenzen 
eine einfache mathematische Bezie¬ 
hung besteht: 

Grundton a 440*2° 12 Hertz 
kleine Sekunde b 440*2 1/12 Hertz 
große Sekunde h 440*2 212 Hertz 
kleine Terz c 440*2 3 ' 12 Hertz 
usw. 

Der Zähler im Exponenten entspricht 
also der Anzahl der Halbtonschritte. 

Damit wäre das Problem gelöst, und 
man kann ein kurzes Programm schrei¬ 
ben, das die Halbtonschritte hörbar 
macht. Dabei ist jedoch zu beachten, 
daß zwischen den Tonperioden im 
SOUND-Befehl des CPC und den Ton¬ 
frequenzen ein reziprokes Verhältnis 
besteht. Man darf deshalb nicht mit den 
Potenzen von zwei multiplizieren, son¬ 
dern muß durch diese dividieren, um 
eine aufsteigende Tonfolge zu erhalten. 
Diese Überlegungen führen zu folgen¬ 
dem Programm: 

100 grundton=284: REM Kammerton a 
110 FOR halb=0 TO 12 
120 leiterton=grundton/2T (halb/12) 
130 SOUND 7,leiterton,100,7 
140 NEXT halb 

Um nun aber die Oktave in eine ande¬ 
re Anzahl Töne als die gewohnten zwölf 
zu unterteilen, ersetzt man die 12 in den 
Zeilen 110 und 120 einfach durch die ge¬ 


wünschte Anzahl. So kommt man zu 
diesem Programm: 

100 INPUT “Unterteilung: “,anz.ton 
110 grundton = 284 
120 FOR schritt=0 TO anz.ton 
130 leiterton = grundton/2f 
(schritt/anz.ton) 

140 SOUND 7,leiterton, 100,7 
150 NEXT schritt 

Mit Hilfe dieser Anregung sollte es je¬ 
dem möglich sein, sich eine Tabelle mit 
ungewöhnlichen Tonschritten zu be¬ 
rechnen, um damit zu experimentieren. 
Besonders interessant ist die Einteilung 
der Oktave in 24 Schritte, weil man ein¬ 
erseits weiterhin die gewohnten Halb¬ 
töne zur Verfügung hat, andererseits 
aber auch dazwischenliegende (Viertel) 
Töne. 


Das wohltemperierte Klavier 


Neben der heute bei Instrumenten wie 
Klavier oder Gitarre üblichen tempe¬ 
rierten Stimmung, die eine Oktave in 
zwölf gleiche Halbtonschritte unterteilt, 
gibt es bei einigen Instrumenten wie 
z.B. der Geige immer noch die soge¬ 
nannte reine Stimmung, bei der die Fre¬ 
quenzen der Töne bestimmte ganzzah¬ 
lige Verhältnisse ergeben. Diese Art der 
Stimmung hat zur Folge, daß ein Gei¬ 
ger den Ton »Es« anders greift als den 
Ton »Dis«, obwohl dies in der tempe¬ 
rierten Stimmung die gleichen Töne 
sind. 

Die heute übliche temperierte Stim¬ 
mung ist eigentlich nur eine gute und 
praktische Annäherung an die ur¬ 


sprüngliche reine Stimmung; sie hat es 
zum Beispiel erst möglich gemacht, ein 
Instrument wie das Klavier zu konstru¬ 
ieren, auf dem sich alle Tonarten 
gleichberechtigt benutzen lassen. Je¬ 
doch bietet sich auch die reine Stim¬ 
mung für Experimente an. Als Einstieg 
soll das Programm »Frequenzverhält¬ 
nisse« (siehe Listing) dienen, das die 
Verhältnisse zwischen den Frequenzen 
hörbar macht. Nach Eingabe einer 
Grundfrequenz und eines Verhältnisses 
wird die zweite Frequenz berechnet. 

Die beiden Töne werden zunächst 
nacheinander und darauffolgend im 
Zusammenklang gespielt. 

Beim Experimentieren mit diesem kur¬ 
zen Programm stellt man schnell fest, 
daß einfache Zahlenverhältnisse Kon¬ 
sonanzen (harmonisch zusammenklin¬ 
gende Töne) ergeben; je einfacher das 
Verhältnis, desto schöner der Klang. 

Und tatsächlich ergeben sich in reiner 
Stimmung für die gebräuchlichen Kon¬ 
sonanzen folgende Frequenzverhält¬ 
nisse: 


Prime 

1 : 1 

Oktave 

2: 1 

Quinte 

3 : 2 

Quarte 

4:3 

Große Terz 

5 : 4 

Kleine Terz 

6:5 

Große Sexte 

5 : 3 

Kleine Sexte 

8:5 


Der Grad der Konsonanz nimmt hier 
von oben nach unten ab. Im Mittelal¬ 
ter wurden nur solche Intervalle als 
konsonant empfunden, bei denen Zäh- 
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ler und Nenner des Verhältnisses zwi¬ 
schen 1 und 4 lagen, also die Prime, die 
Quarte, die Quinte und die Oktave. In¬ 
zwischen werden auch die anderen vier 
aufgeführten Intervalle als Konsonan¬ 
zen wahrgenommen. Durch die häufi¬ 
ge Verwendung von Septakkorden und 
ähnlichen Dissonanzen in der heutigen 
Musik wird das Konsonanzempfinden 
wahrscheinlich weiter abflachen und 
der Unterschied zwischen Konsonanz 
und Dissonanz in Zukunft immer mehr 
verwischt werden. 

Auch hier lassen sich mit dem Compu¬ 
ter prinzipiell neue Wege beschreiten. 
So könnte man zum Beispiel mit der 
Unterteilung der Oktave in 24 Töne ei¬ 
nen Dreiklang aufbauen, der zwischen 
Dur und Moll liegt. Beim Dur- 
Dreiklang liegt auf einem Grundton 
eine große Terz und eine reine Quinte 


(z.B. C-E-G), beim Moll-Dreiklang 
hingegen liegt auf dem Grundton eine 
kleine Terz und eine reine Quinte (z.B. 
D-F-A). Wenn man nun einen Drei¬ 
klang aufbaut aus einem Grundton, ei¬ 
ner reinen Quinte und dem Ton, der 
zwischen kleiner und großer Terz liegt, 
so erhält man einen Akkord, der zwi¬ 
schen Dur und Moll liegt. Hier öffnet 
sich ein weites Feld für Experimente, 
wie Listing 2 andeutet. 


Einige Nachträge 


Die vorangegangenen Betrachtungen 
dürften für alle Soundprogrammierer 
recht aufschlußreich sein. Der Autor 
möchte übrigens gerne mit anderen Le¬ 
sern, die ebenfalls auf diesem Gebiet 
experimentieren, Kontakt aufnehmen. 


Deshalb hier die vollständige Adresse: 
Michael Winkelmann, Meitnerstraße 9, 
3000 Hannover 61. 

Vielen Dank weiterhin an Herrn Willy 
Thönessen aus Darmstadt, der für uns 
einige Literatur zu dem Thema »mathe¬ 
matische Klänge« ausfindig gemacht 
hat: 

- Martin Gardner, Mathematische 
Spielereien: Weiße und braune 
Melodien, Schachtelkurven und 
1/f-Fluktuationen; Spektrum der 
Wissenschaft, Juni 1980, S. 14-22 

- Musical Fractals; Byte (amerikani¬ 
sche Computerzeitschrift), Juni 
1986, S. 185-196, enthält 5 Li- 
stings in MSX-BASIC. 

Besonders der zweite Artikel dürfte von 
einigem Interesse sein, da er praktisch 


Listing 1 

10 ’»#### Soundexperiment 1 [11943 

20 ' [1173 

100 MODE 2 C5133 

110 PRINT "Frequenzverhae1tnisse" [21173 

120 PRINT [3613 


130 INPUT "Frequenz des Grundtons in Hz: " [43943 
,grundton.frequenz 

140 INPUT "Verhaeltnls des zweiten Tons zu [70313 
m Grundton <a:b als a,b eingeben)! ",zaehl 
er,nenner 

150 zweitton.frequenz=grundton.frequenz*za [48093 
ehler/nenner 

160 PRINT [3613 

170 PRINT "Zweiter Ton in Hzzweitton.fr [36103 
equenz 

180 grundton.perlode=125000/grundton.frequ [42103 
enz 

190 zweitton.periode=125000/zweitton.frequ [31333 
enz 


200 SOUND 7,grundton.periode,200,15 [34793 

210 SOUND 7,zweitton.periode,200,15 [29113 

220 SOUND 1,grundton.periode,300,15 [29633 

230 SOUND 4,zweitton.periode,300,15 [27233 

240 WH 1 LE SQ<4)>127:WEND:' Auf Ende des Sou [19303 
nds warten 

250 GOTO 120 [4293 

Listing 2 

10 '##*#» Soundexperiment 2 [12013 

20 ’ [1173 

100 'Huellkurve definieren [11963 

110 ENV 1,4,-1,2,11,-1,30 [7993 

120 'Akkord C-Dur (C-E-G) [19453 

130 SOUND 1,239,80,15,1:SOUND 2,190,80,15, [36893 
1:S0UND 4,319,80,15,1 

140 'Akkord D-Moll (D-F-A) [14223 

150 SOUND 1,213,80,15,1:SOUND 2,179,80,15, [33013 
1:SOUND 4,284,80,15,1 

160 'Akkord G zwischen Dur und Moll [19073 

170 SOUND 1,319,160,15,1sSOUND 2,260,160,1 [47993 
5,1;SOUND 4,213,160,15,1 

160 'Akkord A-Moll (A-C-E) [12523 

190 SOUND 1,284,80,15,1:S0UND 2,239,80,15, [35823 
1:SOUND 4,190,80,15,1 

200 'Akkord C-Dur (C-E-G) [19453 

210 SOUND 1,239,80,15,1:SOUND 2,379,80,15, [48343 
1:SOUND 4,319,80,15,1 


Listing 4 

25 •##*#* Erweiterung 4:Sommer-Winter [11C63 


314S PEN 2:LOCATE 15,23:PRINT "Sommer" [27483 

6060 IF zeit MOD 75 =50 THEN GOTO 6085 [19063 

6065 IF zeit MOD 75 =0 THEN GOTO 6070 ELSE [36223 

zeit=zeit+l:RETURN 

6070 PEN 2!LOCATE 15,23:PRINT "Sommer" [27483 

6072 FOR spa1te=0 TO 10 [12983 

6075 rk(spa1te,0)=spa1te MOD 2 [11163 

6080 NEXT spa1te!zeit=zeit+1:RETURN [22503 

6085 PEN 2:LOCATE 15,23:PRINT "Winter” [28583 

6087 FOR spa1te=0 TO 10 [12983 

6090 rk(spa1te,0)=0 C9193 

6095 NEXT spa1te:zeit=zeit +1:RETURN [22503 

Listing 5 

25 '**«# 1 » Erweiterung 5 ! Zi vi I i sa 11 on [16643 

2025 haus=4 (4123 

2140 REM Haus [7453 

2143 SYMBOL 206,0,24,24,60,60,126,126,82 [22503 

2146 SYMBOL 207,82,126,126,82,82,94,94,0 £23483 


2200 gra*(haus)=CHR$(15)+CHR$(4)+CHR*(206) £38813 
+CHRt(8)+CHR*(10)++CHR*(207) 

2300 DATA O, 1,0,1,0,1,0,1,0,1,0,1,0,1,0,1 £8783 

2310 DATA 1,1,2,2,1,1,2,2,1,1,2,2,1,1,2,2 £22113 

2340 DATA 4, 4,4,4,4,4,4,4,4,4,4,4,4, 4,4,4 £18403 


3180 neu=ABS(INT(RND*ll>-2) MOD 5 [22573 

Listing 6 

25 ’*#»#* Erweiterung 6:Tollwut C9363 

3220 zl=INT(RND»120) £6663 

3225 z2=INT(RND»3Q)+zl C14353 

3230 z3=INT(RND*70)+z2 £7163 

3235 z4=INT(RND*30)+z3 [9963 

3240 RETURN £5553 


6060 JF zeit=zl OR zeit=z3 THEN GOTO 6085 £22093 

6065 IF zeit=z2 OR zeit=z4 THEN GOTO 6070 [33273 
ELSE zeit=zeit+l:RETURN 

6070 LOCATE 14,23:PEN 6:FOR i=0 TO 6-.PRINT £2787 3 
CHRS(143); 


6071 NEXT i:RESTORE 2320 £12133 

6072 FOR zei1e=2 TO 3 £6483 

6074 FOR spa t te = 0 TO 15 £1309 3 

6076 READ rk(spa1te,zei1e) £12083 

6078 NEXT spalte:NEXT zeile C9583 

6080 zeit=zeit+l:RETURN [25713 

6085 LOCATE 14,23:PEN 2:PRINT "TOLLWUT":F0 £34143 

R spalte=0 TO 3 

6087 rk(spa!te,2>=0:N£XT spalte £11803 

6090 FOR spaIte=0 TO 7 £11073 

6092 rk(spa1te,3)=0:NEXT spalte £21733 

6095 zeit=zeit+t:RETURN £25713 
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das musikalische Äquivalent zu den in 
der ersten Folge vorgestellten »Apfel- 
männchen-Grafiken« behandelt. Eini¬ 
ge Leseranfragen betrafen in diesem 
Zusammenhang die Koordinaten des 
Spiralmusters, das die Titelseite der 
Ausgabe 7/86 von CPC International 
schmückte. Bei einer Rechentiefe von 
200 wurden folgende Werte benutzt: 


links 

0.7445 

rechts 

0.7459 

oben 

-0.1121 

unten 

-0.1132 


Abschließend sollen noch weitere Er¬ 
gänzungen zu dem Ökologie-Experi¬ 
ment aus der dritten Folge des 
Software-Experiments vorgestellt wer¬ 
den, die Herr Schmedt aus Harsewin¬ 
kel ausgearbeitet hat. Alle drei Listings 
beziehen sich auf das Wolf-Schaf-Gras- 
Modell und können einzeln mit MER- 
GE in das Hauptprogramm aus Heft 
9/86 integriert werden. 

Erweiterung 4 bewirkt einen Jahres¬ 


zeitenwechsel, der insbesondere das 
Pflanzenwachstum beeinflußt: Der Re¬ 
gelkatalog wird periodisch abgeändert, 
so daß in der insgesamt 100 Sekunden 
dauernden Winterperiode kein Gras 
wächst. Während der doppelt so langen 
Sommerperiode ist das Wachstum je¬ 
doch normal. 

Erweiterung 5 untersucht den Einfluß 
der Zivilisation auf die Entwicklung 
der Mini-Ökologie, indem eine Reihe 
Häuser auf dem Spielfeld verteilt wer¬ 
den. In ihrer direkten Nachbarschaft 
haben Schafe und Wölfe einen schwe¬ 
ren Stand: Falls sie der Zufallsgenera¬ 
tor erwischt, werden sie durch ein 
Leerfeld ersetzt. Ansonsten bleiben die 
Regeln unverändert. 

Erweiterung 6 führt schließlich zum 
Auftreten der bei Förstern und Land¬ 
wirten gefürchteten Tollwut. Während 
der zufällig einsetzenden Seuchenpe¬ 
rioden werden Schafe und Wölfe durch 
Leerfelder ersetzt, die Vermehrung 
bleibt jedoch unbeeinflußt. Der Beginn 


wird durch die Variablen zl und z3 be¬ 
stimmt, das Ende durch z2 und z4. 

In der dritten Folge hatten wir dazu auf¬ 
gerufen, die Ökologie-Simulation zu 
einem sowohl spannenden als auch 
lehrreichen Spielprogramm zu erwei¬ 
tern. In der Tat ist uns inzwischen ein 
sehr interessantes Programm zugegan¬ 
gen, wobei sich die Autoren jedoch für 
das nicht minder aktuelle Thema »Ent¬ 
wicklungshilfe« entschieden haben. 

Diese bereits erfolgreich im Schulun¬ 
terricht eingesetzte Simulation ist zwar 
zu komplex und umfangreich, um sie 
als Listing abzudrucken - sie wird in 
der Databox zur nächsten Ausgabe ent¬ 
halten sein — doch konnten wir die Au¬ 
toren für einen Bericht über den Hin¬ 
tergrund und die pädagogischen Ein¬ 
satzmöglichkeiten dieses Programms 
gewinnen. Folge 9 des Software- 
Experiments dürfte deshalb für Lehrer, 
die das Thema Entwicklungshilfe im 
Unterricht behandeln wollen, beson¬ 
ders interessant werden! 

(Mathias Uphoff) 


Information total... CPC International Sonderhefte 
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Sonderheft 1/86: 

Software - Listings - Inlos lür alle Schneider CPC! 
Sonderheft 1 beinhaltet eine abwechslungsreiche Samm¬ 
lung beliebter und nützlicher Programme aus den Sparten 
Anwendung, Spiel und Tips & Tricks 
Der große DFÜ-Sonderleil zeigt Ihnen alles Wissenswerte 
zur Datenfernübertragung aut und vermittelt Basiswissen 
Insgesamt 28 aktuelle Listings Software satt im CPC 
Sonderheft 1/86! 



Sonderheft 2/86: 

CP/M - rioppys - Hardware Schwerpunkte im CPC 
Sonderheft 2 Sie erfahren z.ö, wie eine relative Dateiver 
waltung realisiert wird und wie der CPC Daten mii Apple 
und IBM auslauschen kann. 

Die Haroware-Ruhnk sorgl für Nacnwuchs der Schneider- 
Flonpy, ein 3 5" - Laufwerk läßl sich ohne Probleme an den 
CPC anschiießen Das CPC DOS 30 erweitert den horizon: 
der CPC's um ein Vielfaches und läßl die Programmierer 
herzeri höher schlagen Und viele Supermios zu CP/M 
- eine wahre Fundgrube lür alle CPC Besitzer! 


Richten Sie Ihre Bestellungen an: 

DMV-Verlag, Fuldaer Str. 6, 3440 Eschwege 

— Bitte Bestellkarte benutzen! — 
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Sonderheft 3/86: 

Reviews - Spiele - Anwendungen — ein wahres Hil- 
Sammelsorium birgt das CPC Sonderheft 3/86 
Die besten Spielurogramme iin Überblick und viele Tips 
Lösungen und Karlen zu Computcrspielen uno Abenleu 
ern Begeistern wird Sie auch der Flugsimulator - ein ech 
ter Leckerbissen zum Einlippen! Fantasy und Adventure 
freunde werden sich über das ersle Rollenspieladvenlure 
Monstergarler sicherlich genauso freuen, wie die 
Ha f üware-Freunde über die Eel'lzeiluht zum Selbsfbau 
Des weiteren gibt cs viele tolle Programme aus den Berei¬ 
chen Spiel, Anwendung und Utilities sowie fundierte Berich 
le über die effektive Inlerruplprogrammierung Da ist lür |e- 
oen etwas dabei das CPC Sonderheft 3/85 st seif dem 
8 September überall im Handel Und natürlich: Alle Pro¬ 
gramme sind auch auf Diskette oder Kassette erhältlich! 
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Erläuterungen zum Programm 
BESTELLUNG 


Das Programm ist auf Diskette gespei¬ 
chert und wird mit RUN “START ge¬ 
startet. Mit diesem Programm werden 
Voreinstellungen des Computers durch¬ 
geführt und die notwendigen Routinen 
SYMBOL und WINDOW initialisiert. 
Nach Eingabe des Datums wird dann 
der Firmenkopf angezeigt und danach 
das eigentliche Programm geladen. Vor 
dem Start des Programms muß unbe¬ 
dingt ein RESET durchgeführt werden, 
da sonst Initialisierungsfehler auftreten 
können. 

Mit diesem Programm können Mate¬ 
rial-Listen verwaltet und Bestellisten 
gefertigt werden. Es besteht die Mög¬ 
lichkeit, max. 400 Datensätze zu spei¬ 
chern. Je Datensatz werden die Artikel¬ 
bezeichnung, die Grundeinheit und der 
Preis je Einheit eingegeben. Mit diesen 
Daten aus der Artikeldatei können nun 
Listen unter dem Programmzweig BE¬ 
STELLUNG gefertigt werden, um den 
Lagerbestand wieder zu erhöhen. 
Nachfolgend werden die einzelnen Pro¬ 
grammteile genau erläutert. Das Haupt- 


menue enthält folgende Auswahlmög¬ 
lichkeiten: 

1. Artikeldatei bearbeiten 

2. Bestellung bearbeiten 

3. Systemmenue 

4. Ende 

1.00 A Artikeldatei bearbeiten 
In diesem Programmzweig bestehen 
die Möglichkeiten, eine neue Datei an¬ 
zulegen, Dateien von Disc zu ändern 
und Dateien auszudrucken. Durch Ein¬ 
gabe —H- für Hauptmenue wird ab¬ 
gefragt, ob die im Speicher befindliche 
Datei gespeichert werden soll. Danach 
wird der Datenspeicher gelöscht. 

1.10 A Datei neu anlegen 
Zunächst wird der Datenspeicher ge¬ 
löscht. Danach wird der Dateiname für 
die neue Artikeldatei abgefragt. Die 
Eingabe erfolgt ohne Extension! Nach¬ 
dem die Tabelle aufgebaut ist, können 
beginnend mit Daten satz 1 die Artikel, 
Einheiten und Preise eingegeben wer¬ 
den. Die Neueingabe kann mit der Ein¬ 
gabe —E- in Groß-oder Kleinbuchsta¬ 
ben für die Artikelbezeichnung beendet 


werden. Es wird dann wieder das 
Menue — Artikeldatei bearbeiten zur 
Auswahl der weiteren Bearbeitung auf 
dem Bildschirm angezeigt (vergl. 1.00). 

1.20 V Datei verändern 

Bevor dieses Untermenue angezeigt 
wird, prüft der Rechner, ob eine Datei 
im Datenspeicher vorhanden ist. Ist 
dies nicht der Fall, so wird das Inhalts¬ 
verzeichnis der auf Disc vorhandenen 
Artikeldateien angezeigt und zur Ein¬ 
gabe des Namens der zu ladenden Da¬ 
tei aufgerufen. Die Datei wird geladen 
und das Menue - Datei verändern - 
angezeigt. Hier bestehen die Wahlmög¬ 
lichkeiten, die Artikeldatei zu vergrö¬ 
ßern, d. h. am Ende Daten anzuhän¬ 
gen, einzelne Artikel zu ändern, einzu¬ 
fügen oder zu löschen oder die Einzel¬ 
preise (z.B. bei Preisänderungen des 
Lieferanten) zu verändern. Mit der Ein¬ 
gabe —M— für Menue gelangt man 
wieder in das Menue — Artikeldatei 
verändern — (vergl. 1.00). 

1.21 L Artikel löschen, einfügen, än¬ 
dern 

Nachdem die Tabelle aufgebaut und mit 
den Daten gefüllt ist, erscheint unter¬ 
halb der Tabelle die Anzeige der Be- 


IArtikeldatei 
H bearbeiten 

u - 


(Bestellung 
Hbearbeiten 

>—.. i 


IRUN “START.BAS“ 1|—| 

i J 


HSysteamnii 


r— Datei neu anlegen 


I r 


I 

IIHH 


I | Datei verändern I I 

H 112KH r 


111 


r— Artikel löschen einfügen ändern 112.1 
I— Artikel anhangen .2 


IPreise ändern I r- Preise prozentual erhöhen 112.31 

H 112.3 1 4 " Preise prozentual verringern .32 

■33 


»* «— Preise einzeln ändern 


Datei sortieren 
Datei ausdrucken 


113 

114 


I i— Neue Bestellung bearbeiten 121 


I— Alte Bestellung bearbeiten 122 
Bestellung drucken 123 


IDiscinhalt 

iHanzeigen 

I *- 

I 


131 


r— Artikeldateien 
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I i — ■ ■ - — i 
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—l I 
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— 1 MDatei löschen 13 31 4 Bestelldatei 
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■ "i 
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.2 
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fehlstasten. Da nicht alle Datensätze auf 
einer Bildschirmseite dargestellt wer¬ 
den können, kann mit den Tasten CUR¬ 
SOR LINKS und CURSOR RECHTS 
jeweils eine Bildschirmseite zurück- 
bzw. vorgeblättert werden. Durch 
Drücken der Taste M gelangt man wie¬ 
der ins Menue — Datei verändern — 
(vergl. 1.20). Mit der Taste L können 
Artikel gelöscht werden. In der Status¬ 
zeile wird die laufende Nummer abge¬ 
fragt. Der Datensatz wird gelöscht und 
alle folgenden Datensätze um eine 
Nummer vorgezogen, um die entstan¬ 
dene Lücke wieder zu füllen. Mit der 
Taste A können Eintragungen für einen 
Datensatz geändert werden (Artikel- 
bez., Einheit, Preis). Die laufende 
Nummer des zu ändernden Artikels 
wird in der Statuszeile abgefragt. Da¬ 
nach werden nacheinander die neuen 
Daten für Artikelbezeichnung, Einheit 
und Preis eingegeben, die jeweils sofort 
unten in die Tabelle eingefügt werden. 
Danach wird der Inhalt der Tabelle neu 
aufgebaut. Mit der Taste — E— können 
Datensätze eingefügt werden. Zuerst 


wird geprüft, ob die Datei noch weite¬ 
re Datensätze aufnehmen kann. Dann 
wird die laufende Nummer des einzu¬ 
fügenden Artikels in der Statuszeile 
eingegeben. Ab dieser Nummer wer¬ 
den alle weiteren Datensätze um 1 ver¬ 
schoben. Damit ist diese Nummer frei 
und kann neu eingegeben werden. Die 
Daten werden wie unter — A Datensatz 
ändern - erläutert, in der Statuszeile 
eingegeben. Danach wird die Tabelle 
neu aufgebaut. 

1.22 A Artikel anhängen 
Nachdem die Tabelle aufgebaut ist, 
wird geprüft, ob die Datei noch weite¬ 
re Artikel aufnehmen kann. Danach 
können die Artikel wie unter 1.10 (A 
Datei neu anlegen) erläutert eingegeben 
werden. Mit der Eingabe —E— für Ar¬ 
tikelbezeichnung gelangt man wieder 
ins Menue — Datei verändern — (ver¬ 
gl. 1.20). 

1.23 P Preise ändern 

Mit dieser Routine haben Siö die Mög¬ 
lichkeit, die Grundpreise aller Art. ent¬ 
weder prozentual zu erhöhen oder zu 
verringern. Die Preise können auch 


einzeln geändert werden. 

1.30 S Datei sortieren 
Die Artikeldatei wird innerhalb weni¬ 
ger Sekunden alphabetisch sortiert. 
Dazu wurde die Quicksortroutine inte¬ 
griert. Eine Maschinenroutine, die die¬ 
se Arbeit noch ca. lOOmal schneller er¬ 
ledigt, kann direkt bei mir angefordert 
werden. 

1.40 D Datei ausdrucken 
Nach der Prüfung, ob sich eine Datei 
im Datenspeicher befindet (vergl. 1.20 
erster Abs.), wird die Datei mit Name 
und und Datum als Tabelle über 
Drucker ausgegeben. Danach wird das 
Menue — Artikeldatei bearbeiten — 
aufgerufen. Das Unterbrechen oder 
Abbrechen des Ausdrucks ist nicht 
möglich. Aus diesem Grund ist dafür 
zu sorgen, daß der Drucker eingeschal¬ 
tet und genügend Papier (für 400 Da¬ 
tensätze werden 7 DIN A 4 Seiten be¬ 
nötigt) eingelegt ist. Der Ausdruck 
kann aus o. g. Grund auch nicht mit 
Einzelblatteinzug erfolgen. 

2.00 B Bestellung bearbeiten 
In diesem Programmzweig bestehen 


Software-Schnell-Versand 



MAGIC BRUSH 


Endlich cdn Graphlkpaker, da» dir MBgUchkeltsi der Sctrrldcr Counter 
voll asrelzt I MtCIC-BSUai nun n»t einfach auapcoblert hob» - Jede 
Hai*, reue furtdionn - hlitzactaeU - WlnctaTelchr ln der telleuK . 

Sntdwkan auch Sie die untnuitzten tfcglicHu-lt» Ihres SUrlrera I 

* IC0I toschtnenaprache, dadirch ausserst achreü * 

* Steuerung des Programm durch Pull-Up Tectalk * 

* alle drei Modes verftghar * 

* Bodtatng durch Tastatur, Joystick iral Maus möglich • 

* alle Fotktlan» ha Seilst taal Chjeksradta; verftghar * 

• teile das 81 Idee kaust ssgtelchert verdat (Cllpr-Ari) * 

• voller Seine 1 der Graphlkzeldcrtsmtz verfügbar 4 

* Eingebauter Zeldreuatredltcr fir eigere: Schrift Ol • 

* SplegelftmkHawn tu verschiedene Acht» * 

* Farbeitaiach mach ln Blldaueechnltten * 

* unpropcrUasale Vergrttasen*|yn «glich * 

* tefInitial «11 Sprite* und Step** * 

* fenutanB vat PUItestem (Patterns) » 

* glngahaitar Paccero-Deal&Er * 

* Ftnktlcnen fUr Kreise, Ellipsen, Vielecke, Quadrate und Untat * 

* Solid- und Pattam-Pill * 

* Kopieren tnd verschieben vat Objekt» * 

* eclte UN» Pjnktimen * 

* Kconttnetensizelge zuachiltber * 

* Qiraorgeactelndigkelt einstellbar * 

* FuAtlaian fUr Brurii tnd StgtCTbrtsh * 

* PkteelgrUese tnd Welte einstellbar * 

N/CIC-Bt’S- beinhaltet die Basic Ertelterurg (MCIO-MSIC. Damit lat ea 
«glich, die ««eilt» Bilder oder Tai taeacholtte davon ln eignen 
PTCBnanwi tu benutzet - als Graphik», Sprites oder Step»; mit dies» 

Ptrktloen lat edle AntaSlotagriphlk «glich I WCIO-Bim tad NKJIO- 
BASIC tat» st Jeden Sdntidrr CPC. 

/V7,90 9° 
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Waldeck-Software 
Tulpenstraße 30 


2870 Delmenhorst Ladenverkauf: 

Tel.: 04221/1 6464 täglich 15.00 - 18.00 
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die Möglichkeiten, eine neue Bestel¬ 
lung zu bearbeiten, ältere Bestellungen 
zu bearbeiten oder eine Bestellung aus¬ 
zudrucken. Nach Eingabe M für Me- 
nue wird abgefragt, ob die im Daten¬ 
speicher befindliche Bestellung gespei¬ 
chert werden soll. Danach wird der Da¬ 
tenspeicher gelöscht. 

2.10 N Neue Bestellung bearbeiten 
Zunächst wird der Datenspeicher ge¬ 
löscht. Danach wird abgefragt, mit wel¬ 
cher Artikeldatei die Bestellung durch¬ 
geführt werden soll. Diese wird dann 
geladen. Besteht keine Artikeldatei auf 
Disc, wird die Fehlerabfangroutine auf¬ 
gerufen. Der Dateiname der Bestellung 
wird automatisch aus den ersten vier 
Zeichen des Artikeldateinamens und 
dem aktuellen Datum (Tag und Monat) 
gebildet und mit der Tabelle auf dem 
Bildschirm angezeigt. Deshalb sollte 
keine Bestellung mit der gleichen Ar¬ 
tikeldatei am gleichen Tag durchgefuhrt 
werden. Ansonsten wird die Bestellung 
auf Disc mit dem gleichen Dateinamen 
in eine *.BAK Datei umgewandelt. Die¬ 
se könnte notfalls über das Systemme- 
nue wieder in eine *.BST Datei umbe¬ 
nannt werden, damit sie für das Pro¬ 
gramm wieder lesbar ist. Danach wird 
die Tabelle aufgebaut und mit den Da¬ 
ten gelullt. Mit den CURSORTASTEN 
können die Bildschirmseiten geblättert 
werden. Um einen Artikel zu bestellen, 
werden die beiden CURSOR auf den 
Artikel positioniert. Nach Drücken der 
Taste — E— kann dann eingegeben wer¬ 
den, wieviel Einheiten bestellt werden 
sollen. Die Preise werden berechnet 
und angezeigt. Die Gesamtsumme der 
Bestellung wird ebenfalls jederzeit 
rechts unterhalb der Tabelle als — Sum¬ 
me — angezeigt. Mit der Taste M ge¬ 


langt man wieder ins Menue - Bestel¬ 
lung bearbeiten -. 

2.20 A alte Bestellung bearbeiten 
Zuerst wird geprüft, ob der Datenspei¬ 
cher leer ist. Ist dies nicht der Fall, so 
muß er über die Rückkehr zum Haupt- 
menue geleert werden. Danach kann 
dann wieder dieser Programmzweig 
aufgerufen werden. Alle gespeicherten 
Bestellungen auf der eingelegten Disc 
werden angezeigt und zur Eingabe des 
gewünschten Namens ohne Extension 
aufgefordert. Der Dateiname wird wie 
unter 2.10 beschrieben geändert und 
mit der Tabelle angezeigt. Die Eingabe 
erfolgt ebenfalls wie schon be¬ 
schrieben. 

2.30 D Bestellung drucken 
Bevor dieser Punkt aufgerufen wird, 
sollte unbedingt der Drucker einge¬ 
schaltet und genügend Papier eingelegt 
werden. Einzelblatteinzug etc. ist nicht 
möglich (vergl 1.30). Der Kopf (Firma, 
Adresse, Seite etc.) und die Tabelle 
werden ausgedruckt. Das Programm ist 
auf 72-zeiliges Papier eingestellt. Um¬ 
faßt die Bestellung mehr Datensätze als 
auf eine Seite passen, so wird auf jeder 
Seite der Kopf neu ausgedruckt. Es 
werden nur die Datensätze gedruckt, 
bei denen die Bestellmenge größer 0.00 
ist. Nach dem Ausdruck erscheint wie¬ 
der das Menue — Bestellung bearbei¬ 
ten — (vergl. 2.00). 

3.00 S Systemmenue 
Mit diesem Menue kann die Disc bear¬ 
beitet werden oder das Programm auf 
einen Drucker eingestellt werden. Mit 
der Taste M gelangt man wieder ins 
Hauptmenue. 

3.10 I Inhalt anzeigen 

Zunächst wird abgefragt, ob man den 


Inhalt der Artikel- oder Bestelldateien 
bzw. den Normalinhalt ansehen möch¬ 
te. Dann wird dieser angezeigt. Nach 
Drücken einer Taste wird das System¬ 
menue angezeigt. 

3.20 F Disc formatieren 
Mit diesem Programmpunkt ist es mög¬ 
lich, eine Diskette im DATA- oder 
VENDOR-Format zu formatieren. 
Entsprechende Auswahlmenues wer¬ 
den angezeigt. Nach einer Aufforde¬ 
rung, die Programmdisc zu entnehmen 
und eine Leerdisc einzulegen, wird die¬ 
se formatiert. 

3.30 L Datei löschen 
Nach der Anzeige des Inhalts der Disc 
wird der zu löschende Dateiname mit 
Extension abgefragt. Mit Bejahung der 
Sicherheitsabfrage wird die Datei ge¬ 
löscht und das Systemmenue angezeigt. 

3.40 U Datei umbenennen 
Nach der Bereichsauswahl können hier 
Artikel- oder Bestelldateien umbenannt 
werden. Zuerst wird der alte Name mit 
Extension abgefragt. Dann muß der 
neue Name ebenfalls mit Extension 
eingegeben werden. Dabei ist zu beach¬ 
ten, daß vom Programm BESTEL¬ 
LUNG nur Dateien mit der Extension 
.BST verarbeitet werden können. Hier¬ 
mit können auch versehentlich über- 
schriebene Dateien, sogenannte .BAK- 
Dateien, wieder in .BST-Dateien um¬ 
benannt werden. Dabei darf jedoch der 
Name nicht mit anderen Dateien auf 
der Disc übereinstimmem, da diese 
sonst überschrieben, also zu .BAK- 
Dateien werden. Nach einer Sicher¬ 
heitsabfrage wird die Umbenennung 
durchgeführt und ins Systemmenue zu¬ 
rückgekehrt. 

3.50 D Druckermenue 
In diesem Teil wird der eingestellte 
Drucker angezeigt und die Basiczeilen 
genannt, die für einen anderen Drucker 
geändert werden müssen. 

4.00 E Ende 

Es werden die Grundeinstellungen des 
Computers wiederhergestellt und das 
Programm beendet. Das Programm 
kann ohne Datenverlust mit der nach¬ 
folgenden Befehlssequenz wieder ge¬ 
startet werden: GOTO 1000 
Viel Spaß mit diesem Programm 
wünscht (Heinz Wienhoven/TM) 
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1 '•****************C******* 

2 '** START. BAS V2.2 ** 

3 '** Heinz Vienhoven ** 

7 '*********************** 

10 SYMBOL AFTER 256:him=HIMEM: KEY DEF 66,1 

,0 

20 IF him<>42747 THEN CALL &BD13 
30 POKE &BDEE,201 

40 BORDER 24:MODE 2:PRINT CHR®C24);STRINGS 
<80,32);CHR®(24) ; 

50 LOCATE 10, 2:PRINT "VIESOFT Disc Operati 
ng System ";CHR®<164);" 1986" 

60 PRINT TAB(10);"VSDOS 1.0 CPC 464" 

70 PRINT:PRINT "*_" 

80 GOSUB 9000: LOCATE 2,5:PRINT "BUFFER" 

90 OPENOUT "DUMMY":MEMORY HIMEM-1:CLOSEOUT 
100 PRINT " Discpuffer instal1iert!":PRINT 
: PRINT "*_" 

240 GOSUB 9000: LOCATE 2,8: PRINT "SYMBOL" :G 
OSUB 2000 

250 PRINT " SYMBOL im Speicher installiert 
J" 

260 PRINT:PRINT ”*_” 

270 LOCATE 2,11:PR INT "DATE":GOSUB 9000 
280 PRINT " Bitte Datum eingeben <TT.MM. JJ 
> : " ; 

290 GOSUB 3000 

300 IF LEN<an$> 08 THEN 320 

310 IF MID®(an® ,3, 1)0"," OR MID®(an®,6,1) 

<>"." THEN 320 ELSE 330 

320 LOCATE 1,12:PRINT STRING®<70,32):LOCAT 
E 1, 12:GOTO 280 

330 MEMORY HIMEM-3: POKE HIMEM+3,VAL<MID® <a 
n$, 1,2)) 

340 POKE HIMEM+2,VAL(MID®<an®, 4, 2 )) 

350 POKE HIMEM+1,VAL<MID®(an® , 7, 2)) 

360 LOCATE 2,1:PRINT CHR®(24);CHR$(27);CHR 
®(2);"Firma Pusemuckel"; 

370 LOCATE 30,1:PRINT "BESTELLUNG V2.2 
Datum:";an* 

380 LOCATE 67,1:PRINT CHR$<164>;" 1986 VIE 
SOFT":PRINT CHR*(24);CHR*(27);CHR®(0) 

390 LOCATE 1,14: PRINT :GOSUB 9000 

400 LOCATE 2,14:PRINT "WINDOW" 

410 GOSUB 9000: PRINT 

420 PRINT GOSUB 9000: LOCATE 2,16:PRI 

NT "BESTELL,BAS"j 

430 GOSUB 4000:ORIGIN 0,0;MOVE 0,16:DRAV 6 
39, 16 

440 RUN "BESTELL.BAS" 

450 END 

2000 ' **************** 

************ 

2010 ' * New Characters 

on Screen * 


2020 ' * CPC Internatio 

nal 12.85 * 

2030 ' **************** 

************ 

2040 MEMORY HIMEM-82 

2050 FOR adr=HIMEM+l TO HIMEM+82:READ byte 

:POKE adr,byte;s=s+byte: NEXT 

2060 IF s<>8657 THEN MEMORY HIMEM+82:PRINT 


"Datafehler" : END 

2070 CALL HIMEM+1:SYMBOL AFTER 32 
2080 DATA 62,1,50,20,179,33,13,0 
2090 DATA 25,34,21,179,201,71,58,148 
2100 DATA 178,254,32,192,42,150,178,120 
2110 DATA 254,3.40,42,1,0,3,229 
2120 DATA 197,17,0,57,235,237,176,193 
2130 DATA 225,254,1,216,40,12,126,203 
2140 DATA 63,166,119,35,11,121,176,32 
2150 DATA 245,201,126,203,63,182,119,35 
2160 DATA 11,121,176,32,245,201,43,17 
2170 DATA 8,0,6,96,25,54,255,16 
2180 DATA 251,201 


2190 ' 

hr®(27)|ehr®(0) 

**** 

Normal ==> 

c 

2200 ' 

hr®(27);ehr® <1) 

**** 

Fett ==> 

c 

2210 ' 

hr®(27);ehr®(2) 

**** 

Kager ==> 

c 

2220 ' 

**** 

Unterst==> 

c 


hr®(27);ehr®(3) 

2230 RETURN 

3000 ' Datum abfragen 

3005 an$="" 


114583 

C5773 

[37933 

(9043 

(4233 

(21163 

(42003 

[20163 

[8203 

[22073 

(36063 

[3635] 

[34483 

(19953 

(8203 

(30883 

[38243 

19613 

C15313 

[34803 

[21403 

(19183 

(22223 

(16633 

(36263 

(36763 

[43703 

(14433 

[17393 

(18393 

(38623 

(27233 

(6473 

(1103 

(11643 

(15923 

(18773 

(11643 

[1993 

(39503 

[26673 

(16853 
(8813 
[15403 
[16403 
(11373 
(14943 
[10603 
(20583 

(17893 

[20473 

(8363 

(703 

[23433 

[17313 

[13283 

(13793 

(5553 
[12723 
[ 1873 


Jetzt kommen die Software-Profis! 


Die mit Erfahrung 

NEUE Programme für PC 1512 

Seit 1969 

ELSAS-Proiektverwaltung 

DM 942,- 

ELSAS—Aktenverwaltung 

DM 942,- 

ELSAS + - Projektverwaltung 

DM 1392,- 

ELSAS + - Aktenverwaltung 

DM 1392.- 

ELSAS-86-An!agenbuchhaltung 

DM 892,- 

'Lohn/Gehalt für Einzelanwender 

ab DM 1999,- 

‘Lohn/Gehalt für Mehrfachanwender 

ab DM 2451,- 

‘Baulohn für Einzelanwender 

ab DM 5187,- 

‘Baulohn für Mehrfachanwender 

ab DM 5586, - 

Baustellenauswertung 

DM 1140.- 

‘Thermosoft für Heizungsinstallateure 

ab DM 740,- 

‘PS für Kfz-Werkstätten 

ab DM 1999, - 

AdreßStart 

Der Karteikasten für den EDV-Neuling 

Volle Anrechnung des Preises auf Kauf 
von AdressPerfekt oder Quick & Easy 
(keine Demo) 

DM 49,95 

AdressPerfekt 

Adreßverwallung für den Profi mit Verbin¬ 
dung zu Wordstar, Word und WordPerfect 
sowie den Debitoren aus ComPack 

DM 399,- 

Quick & Easy 

Textverarbeitung und Adreßverwallung 
für den Profi mit Verbindung zu den Debitoren 
aus ComPack. (Siehe eigene Anzeige) 

DM 595,- 

Große Umtauschaktion für ComPack- 

und TexPack-Anwender 

‘ ‘TexPack-CPC gegen TexPack-JOYCE 

DM 98,- 

* ‘TexPack gegen Quick & Easy 

DM 489,- 

' ‘ComPack-CPC gegen ComPack-JOYCE 
“ComPack-CPC oder -JOYCE gegen 

DM 79.80 

ComPack PC 1512 

DM 98,- 

* ‘ComPack PC 1512 gegen ELSAS 

Liste mit Unterschieden anfordern! 

DM 298.- 

* ‘ComPack PC 1512 gegen ELSAS + 

Liste mit Unterschieden anfordern! 

DM 798,- 


‘mit Anschluß an ComPack-Finanzbuchhaltung! 

* 'bei weiterer Verwendung der vorhandenen Daten! 


infosystems 


SOFTWARE-VERTRIEBS GMBH 
Die helfende Hand im Softwareland! 
Dörrhoff 7 • 4419 Laer • Telefon (02554) 12 32 


DIE HELFENDE HAND IM SOFTWARELAND! 


Schulung, Beratung, Untorttlitmng • ALLES zw»I Wochen zur Probe ■ ALLES von INFOSY5TEMSI 

~| Bitte senden Sie uns folgende Programme gegen Bar¬ 
scheck oder Nachnahme, mit 14 Tagen Rückgaberecht 
unter Anrechnung von DM 19,80 bei Rückgabe. 


COUPON □ Bitte senden Sie uns folgende Demo-Disketten mit An¬ 
wenderhandbuch gegen Barscheck oder Nachnahme 
zum Preis von DM 49,90. 


Bitte senden Sie uns folgende Unterlagen kostenlos: 


Name:_ 

Firma:_ 

StraBe:_ 

PLZ/Ort:_ 

DatumfUnterschnft: 
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3010 y*=INKEY$: IF y$='"* THEN 3010 [27083 

3020 IF ASC<yS)=13 THEN RETURN [1540] 

3030 IF ASC<yS)=127 THEN an*=LEFT*<an$,LEN [24513 
<an$)-l) 

3040 IF y$<>"," AND <y$<"0" OR y$>"9"> THE (40973 
N PRINT CHRSC7);:GOTO 3010 

3050 PRINT y*j:an$=an*+y$ ; y$='"' ; GOTO 3010 [22683 


4000 •' Windows [2683 

4010 WINDOWS, 1,80,2,23 [ 11983 

4020 WINDOW#!,1,80,25,25 [10103 

4030 WIND0W#2,1,4,5,21 [10813 

4040 WINDOW#3,6,44,5,21 C11343 

4050 WIND0W#4, 46,49,5,21 [10943 

4060 WIND0V#5,51,56,5,21 [15763 

4070 WINDOW#6,58,65,5,21 [12373 

4080 WINDOW#7,67,75,5,21 [14483 

4090 RETURN (5553 

9000 'Verzoegerungsschleife [9153 

9010 FOR i=l TO 500:NEXT i:RETURN [12133 


1 - #***#*****#**********-**^**^****** 

2 '*** BESTELL,BAS V2.2 **** 

3 "*** WIESOFT 1986 **** 

4 '*** Heinz Wienhoven **#* 

8 'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


10 IF HIMEM<>36773 THEN CALL &BD13 
20 le$=STRING*<80,32):in$=CHR*<24);bi$=CHR 
$<7>:sum=0:fet$=CHR$<27>+CHR$<1) 

22 mag$=CHR* < 27)+CHRS < 2) : norm*=CHR$ < 27)+CH 
R* < 0 >;unter®=CHRS< 27)+CHRS < 3) 

30 1=0,■ wa=0: wa$="" : y$="" ; an=0: en=0: dat$="" 
:na$= HH :an$="":er=0:k= 0 : j= 0 : me=0 
40 DIM arS<400,5) 


140 FOR i=0 TO 7 
150 CLS#i 
160 NEXT i 

170 'XXX Datum einiesen 

180 a=PEEK<36776):a=a+100:a$=RIGHTS<STR$<a 
),2):nt=aS+"." 


190 datS=a$:a®="" 

200 a=PEEK<36775);a=a+100:a$=RIGHT*<STR$<a 
>,2):a$=a*+”." 

210 dat$=dat*+aS:a*="" 

220 a=PEEK<36774):a=a+100:a$=RIGHT$(STR®<a 

) , 2 ) 

230 dat*=dat$+a*:a$=”" 

240 ON ERROR GOTO 30000 
1000 'XXX Hauptmenue 

1010 !USER,0:CLS:LOCATE 30,4:PRINT fet$;"H 
auptmenue";norm* 

1020 LOCATE 26,6:PRINT"(A3 Artikeldatei be 
arbeiten" 


1030 LOCATE 26,7:PRINT"[B3 Bestellung bear 
beiten" 

1040 LOCATE 26,8:PRINT"£S3 Systemmenüs" 
1050 LOCATE 26,9:PRINT"[E3 Ende" 

1060 wa$="ABSE" 

1070 GOSUB 9900 


mm 

[12773 
[1817] 
[13913 
C24193 
[3417] 

[40343 

(29473 

[6623 

[4863 

[5093 

[3753 

C16813 

(41003 

I527I 

C4195] 

(9353 

[26983 

[9353 

[16213 

[8123 

[40103 

[3452] 

[3242] 

[17323 
[20483 
C5033 
[957] 


1080 LOCATE 1,4:FOR i=l TO 6;PRINT le$;:NE [26683 
XT i 

1090 ON wa GOSUB 2000,4000,20000,1500 (23243 

1100 GOTO 1010 (3453 

1500 CLS:KEY DEF 66,1,252:!USER,0;CALL &BC (22783 
02:END 

1600 '*** Tabellenaufbau [12493 

1610 CLS:PRINT TAB<20);"Datei: ";fet$;ar$< [28603 
0,1);norm® 

1620 PRINT" Nr. Artikel";TAB<46);"Einh Pre [31673 
is Menge Gesamt" 

1630 MOVE 8,350:DRAW 610,350:MOVE 32,370:D [37813 

RAW 32,60:MOVE 356,370:DRAW 356,60 

1640 MOVE 396,370: DRAW 396,60: MOVE 452,370 [31083 

:DRAW 452,60;MOVE 524,370:DRAW 524,60 

1650 LOCATE 61,22:PRINT"Summe: 0000.00 DM” (25593 


1660 RETURN [5553 

1700 'XXX Windows loeschen (13423 

1710 CLS#2:CLS#3:CLS#4:CLS#5:CLS#6:CLS#7:R (33583 
ETURH 

1800 '*** Tabelle fuellen (8903 

1810 GOSUB 1700 (8713 

1820 FOR ii=er TO er+16 l 10743 


1830 PRINT#2,USING" ###";ii;:PRINT#3,ar$<i [3246] 
i,1):PRINT#4,ar$<ii,2) 

1840 PRINT#5,USING"###.##";VAL<ar$<ii,3)) ; (18123 
1850 PRINT#6,USING"####.##”;VAL<ar$<ii,4)) [19033 
1860 PRINT#?,USING"#####.##";VAL<ar®<ii, 5) (15303 
> 

1870 NEXT ii:RETURN (11363 

2000 '*** Artikeldatei (8813 

2005 !USER,10 (6263 

2010 LOCATE 30,4:PRINT fet*;"Artikeldatei [48663 
bearbeiten";norm® 

2020 LOCATE 26,6: PRINT" (A3 Datei ne\i anleg (27053 
en" 

2030 LOCATE 26,7:PRINT"(V3 Datei veraender (31553 
n" 

2033 LOCATE 26,8:PRINT"(S3 Datei sortieren [27063 


2035 LOCATE 26,9:PRINT"(D3 Datei ausdrucke (33703 
n" 

2040 LOCATE 26,10:PRINT"(HD Hauptmenue" [2240] 
2050 wa$="AVSDH”:GOSUB 9900 (9073 

2060 LOCATE 1,4:F0R i = l TO 7.-PRINT le$;:NE (23683 
XT i 

2065 IF wa=5 THEN GOSUB 4500: me=0: RETURN C16953 

2070 ON wa GOSUB 3000,2200,2800,2500 (23453 

2080 GOTO 2010 [3053 

2200 'XXX Datei veraendern (15563 

2205 IF ar$<0, 1)0""THEN 2210 (15053 

2206 GOSUB 9200:GOSUB 9100 (19913 

2210 LOCATE 30,4:PRINT fet*;"Datei veraend (34063 

ern" ; norm® 

2220 LOCATE 26,6:PRINT"(L3 Artikel loesche (43523 
n,einfuegen,aendern" 

2240 LOCATE 26,7:PRINT"[A3 Artikel anhaeng [43043 


en" 

2260 LOCATE 26,8:PRINT"(P3 Preise aendern" 
2270 LOCATE 26,9:PRINT"(M3 Menus" 

2280 wa$="LAPM":GOSUB 9900 


(28963 
[14993 
(21773 


Zwei Themen - ein Ereignis: 



Hobby-tranic 

10. Ausstellung für Funk- und Hobby-Elektronik 



Dortmund 

18.-22. Februar 1987 


Die umfassende Marktübersicht für Hobby- 
Elektroniker und Computeranwender, 
klar gegliedert: 

In Halle 5 das Angebot für CB- und 
Amateurfunker, Videospieler, DX-er, Radio- 
Tonband-, Video- und TV-Amateure, für 
Elektro-Akustik-Bastler und Elektroniker. 

Mit dem Actions-Center und Laborversuchen, 
Experimenten, Demonstrationen und vielen 
Tips. 

In Halle 6 das Superangebot für Computer¬ 
anwender in Hobby, Beruf und Ausbildung. 
Dazu die „Computer-Straße" als Aktions¬ 
bereich, der Wettbewerb „Jugend program¬ 
miert" und die Stände der Computerclubs. 


AusttclIungsgeländeWeslfalenliallcn Dortmund täglich 9.00-18.00 Uhr 
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229® LOCATE l,4:FOR i=l TO 6;PRINT le$;:NE 
XT i 

2295 IF wa=4 THEN RETURN 

2300 ON wa GOSUB 3300,3700,2400 

2305 GOTO 2210 

2400 '*** Fraise aendsrn 

2410 LOCATE 30,4:PRINT fet*;"Preise aendsr 
n";norm* 

2420 LOCATE 30,6:FEINT "CE3 alle Preise pr 
ozentual erhoeheu" 


2430 LOCATE 30,7:PRINT "CV3 alle Preise pr 
ozentual verringern” 

2440 LOCATE 30,8;PRINT "CP] einzelne Preis 
e aendsrn" 

2460 LOCATE 30,9:PRINT "CM] Menne" 

2470 wa$="EVPM":GOSUB 9900;LOCATE 1,4:FOR 

i=l TO 7:PRINT le$;:NEXT i 

2480 IF wa=4 THEN RETURN 

2490 ON wa GOSUB 6000,6200,6400 

2495 GOTO 2410 

2500 Datei ausdrucken 


2510 IF ar$(0,1)<>""THEN GOTO 2530 

2520 GOSUB 9200:GOSUB 9100 

2530 PRINT#1,"Die Datei ";ar$(0,l);" wird 

ausgedruckt!":i=l 

2540 PRINT#8,"Datei: ";ar$(0,1>;" 

Datum: ";dat$ 

2550 WHILE ar$( i, 1> <>”" 

2560 PRINT#8,USING"### \ 

\ \ \ ###.##";i;arSCi,1);ar$(i,2 

);VAL(ar$(i,3>> 

2570 i=i+l:WEND 

2580 CLS#1:RETURN 

2800 '**.* Datei sortieren 

2810 IF ar$10,1)="" THEN GOSUB 9200:GOSUB 
9100 

2820 CLS:LOCATE 5,10;PRINT "Die Datei ";ar 
$<0,1>;" wird alphabetisch sortiert" 

2830 1=400 

2840 WHILE ar$(i, 1> ="":i=i-l:WEND 

2860 GOSUB 12003 

2870 FEINT "Datei ist sortiert" 

2880 FOR i = 1 TO 200:NEXT;CLS: RETURN 
3000 '*** Datei neu anlegen 
3010 GOSUB 9600:GOSUB 9200 

3070 GOSUB 1600:GOSUB 1700 

3071 ab=l 

3080 LOCATE 3,22:PRINT "Bei Ende der Einga 
be fuer Artikel -E- eingeben 

3081 FOR i=ab TO 400 
3090 GOSUB 3800 
3160 NEXT i 

3200 CLS:RETURN 

3300 '*** Artikel loeschen aendern einfueg 
en 

3310 GOSUB 1600 

3320 LOCATE 3,22:PRINT " ";CHR$(242);" Se 

ite zurueck /" ; C.HR$<243) ; " Seite vor /M Me 
nue /L loeschen /E einfuegen /A aendern"; 
3330 er=l:GOSUB 1800:an=48:en=57:wa$=CIIR$< 
242)+CHRS(243)+"MLEA" 

3340 GOSUB 9900:ON wa GOTO 3350,3370,3390, 
3400,3470,3590 

3350 er=ei—17: IF er<l THEN er=l 
3360 GOSUB 1800:GOTO 3340 
3370 er=er+17:IF er>384 THEN er=384 
3380 GOTO 3360 
3390 CLS:RETURN 

3400 GOSUB 10000:J = VAL(an$ >:me=l;PRINT#1, " 
Einen Moment bitte!"; 

3410 FOR i=j TO 399 
3420 FOR k=l TO 5 
3430 arS(i,k> =ar$( i + 1,k) 

3440 NEXT k,i 

3450 FOR k=l TO 5:ar$(400,k)="":NEXT k 
3460 GOTO 3360 

3470 IF ar$(400,1)<>""THEN PRINT#1,"Datei 
voll!":FOR i=l TO 2000:NEXT:CLS#1:GOTO 334 
0 

3480 GOSUB 10000:j=VAL(anS):PRINT#1,"Einen 
Moment bitte!";:me=l 
3490 FOR i=399 TO j STEP-1 
3500 FOR k=l TO 5 
3510 arS<i + l,k)=ar$<i, k) 

3520 NEXT k,i 
3530 i=j:GOSUB 3800 


C 2668) 

C1275) 
C1885) 
C361) 

C1065] 
C2453) 

C3889) 


C 4922) 

C4464) 

C1364) 
C4026) 

[1275] 
[19573 
[3533 
[14123 
[ 2200 ] 
[19913 
C2726] 

C 3069) 

C10913 
C50893 


[758) 

[12423 
[1254] 
[24023 

C5396) 

[306) 

[19873 

[996] 

C2249) 

[1533] 

C14833 

C23093 

[16643 

C361] 

[74943 

C6203 
[ 9933 
[3753 
[8323 
C20833 

[8593 
C102533 


C 2747] 

[23533 

[1556] 
C10563 
[1700] 
[457] 
[832) 
r 49933 

[9633 

[10813 

[15893 

[3763 

[19763 

C 457) 

C38933 


[4674) 


[728) 

[10813 
[9553 
C3763 
[9793 
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3580 GOTO 3360 [457] 

3590 GOSUB 10000:j=VALCan$):me=l:GOTO 3530 [24923 
3700 '*** Artikel anhaengen C882] 

3710 GOSUB 1600 [859] 

3720 FRINT#1, "Einen Moment bitte!",'1=0 (16371 

3730 IF ar$ <400, 1)0""THEN PRINT#1,"Datei (33651 
voll!":FOR i=l TO 2000:NEXT i:RETURN 
3740 VHILE ar$(i, 1)0"" : i=i + l: VEND (18111 

3750 ab=i:er=ab-17;IF er<l THEN er=l (20491 

3755 GOSUB 1800 (8831 

3760 GOTO 3080 (6241 

3800 '*** Daten eingeben (11471 

3810 PRIHT#1, i;"Artikelbez, :";:an=32:en=12 (60661 


2:GOSUB 10000: IF UPFER$(an*> ="E"THEN i = 400 
:GOTO 3880 ELSE ar*(i,1)=LEFT$(an*,29) 

3830 PRINT#1,i;"Einheit:GOSUB 10000:ar$ (22741 
< i , 2) =LEFT* ( nn$,3) 

3850 PRINT#1,i;"Preis:"j:an=46:en=57:GOSUB (90231 
10000:IF VAL(an*)>999,99 OR VAL(an$)<0.01 
THEN GOSUB 4900:GOSUB 9800: GOTO 3850 ELSE 


ar$(i,3)=anS 

3860 ar$(i,4)="0":arS<i,5)="0" (13241 

3870 GOSUB 1800 (8831 

3880 RETURN (5551 

4000 '*** Bestellung bearbeiten (19101 

4005 CLS (911 


4010 LOCATE 30,4:PRINT fet$;"Besteilung be (50051 
arbeiten";norm* 

4020 LOCATE 26,6:PRINT"(NI neue Bestellung (31801 
bearbeiten" 

4030 LOCATE 26,7;PRINT"(Al alte Bestellung (36081 
bearbeiten" 

4035 LOCATE 26,8:PRINT"(Dl Bestellung druc (24891 
ken" 


4040 LOCATE 26,9:FRINT”(Ml Menue" (14991 
4050 wa*="NADM":GOSUB 9900:an=46:en=57 (18461 
4060 LOCATE 1,4:FOR i = l TO 6:PRINT leS; ; NE (26681 
XT i 

4070 IF wa=l THEN1 USER, 10;GOSUB 9600 (22221 
4080 IF wa=2 THEN!USER,5 (15871 
4085 IF wa=3 THEN!USER,5:GOSUB 5000:GOTO 4 (25601 
000 

4090 IF wa=4 THEN GOSUB 4500;RETURN (21061 
4095 IF ar$(0,1> <>""THEN!USER,5:GOTO 4110 (27241 
4100 GOSUB 9200:GOSUB 9100:!USER,5 (31951 
4110 na*=LEFT*(na*,4)+LEFT*(dat*,2)+MID$ Cd (87821 


at$,4,2)+".BST":ar$<0,l)=na$:GOSUB 1600:GO 
SUB 4800:er=l:GOSUB 1800:wa*=CHR$<242)+CHR 
* < 243)+CHR*<240)+CHR*(241)+"ME" 

4120 CLS#1:PEINT#1,CHR*<242);" Seite zurue (135531 
ck/”;CHRS(243>;" Seite vor/";CHR*(240);" C 
ursor auf/":CHR*(241);" Cursor ab/N Menue/ 

E Eingabe”; 

4130 L0CATE#2,1,1:PRINT#2,in*;" "jin*:1=1: (63341 
L0CATE#4,4,1:FEINT#4,in*;" "iin*; 


4140 y$=UPPER*<INKEY*):IF y*=""THEN 4140 (31431 

4150 wa= INSTR< wa$,y*): IF wa=0 THEN LOCATE (48701 
1,1:PRINT bi$;:GOTO 4140 

4160 ON wa GOTO 4200,4250,4300,4350,4000,4 (18261 
450 

4200 er=er-17:IF er(l THEN er=l (15561 

4210 GOSUB 1800:GOTO 4130 (12101 

4250 er=er + 17: IF er>384 THEN er=384 (17001 

4260 GOTO 4210 (3771 

4300 i=i-l:IF i<l THEN i=l (14701 

4310 L0CATE#2, 1, i +1:PRINT#2," ";:L0CATE#4, (21861 
4,i+1:PRINT#4," "; 

4320 L0CATE#2, 1, i : PRI NT#2, inS; ” ";in$;:LOC (49031 
ATE#4,4, i: PRINT#4, in*;" ";in$; 

4330 GOTO 4140 (5571 

4350 i=i+l:IF i>17 THEN 1=17 (20201 

4360 L0CATE#2,1,i-1:PRINT#2," ”;;L0CATE#4, (14831 
4,i—1:PRINT#4,” "; 

4370 GOTO 4320 (5531 

4450 an=46:en=57:CLS#1:GOSUB 10000:IF VAL( (81921 
an*)>9999.99 OR VAL(an*)<0.01 THEN GOSUB 4 
900:GOSUB 9800:GOTO 4450 

4460 ar*(er+i-1,4)=an*:GOSUB 4800 (14011 

4470 GOSUB 1800:GOTO 4120 (12041 

4500 '*** Abfrage Speichern (22461 

4510 PRINT TAB(10);"Sollen die Daten gespe (52851 
ichert werden? Bei Nein werden Sie geloesc 
ht!" 

4520 wa*="JN";GOSUB 9900 (11861 

4530 IF wa=l THEN GOSUB 9000 (20411 


4540 GOSUB 9600 (10481 

4550 RETURN (5551 

4800 '*** Berechnung (8721 

4810 j=l;FRINT#1,"Berechnung! Einen Moment (41111 
bitte!"::sum=0 

4820 WHILE ar$(j,1)<>""AND j<400 (14171 

4830 ar*<j,5)=STR*(VAL(ar*Cj,3))*VAL(ar*(j (54511 
,4))):IF VALCar*(j,5))>99999.99 THEN GOSUB 
4900;ar$(J,4)="0":GOTO 4830 
4840 sum=sum+VAL(ar*(j,5)) (18311 

4850 j=j+l (5441 

4860 VEND (3901 

4870 LOCATE 66,22:PRINT USING" #####,##”;a (20801 

4880 RETURN (5551 

4900 '*:** Fehlermeldung bei zu grosser Zah (27731 
1 

4905 CLS#1 (3731 

4910 PRINT#1,"Die Zahl ist in der Tabelle (49161 
nicht darstellbar!"; 

4920 FOR kk=l TO 2000:NEXT kk (13661 

4930 CLS#1:RETURN (12421 

5000 '*** Bestellung ausdrucken (22411 

5005 FRINT"Drucker einschalten! Weiter mit (51221 
SPACE! " : CALL &BB06: FR I NT#8, CHR$ (27) ; CHR* < 

67);CHR*(72) 

5010 IF ar$(0, 1X)""THEB 5030 (17081 

5020 GOSUB 9200:GOSUB 9100 (19911 

5025 GOSUB 4800 (9541 

5030 PRINT#1,"Die Bestellung wird ausgedru (38991 
ckt!”; :i = l:J =1 

5040 se=l:GOSUB 5520 (16351 

5050 VHILE ar$< i , 1)0"" AND i<401 112941 

5060 IF VAL(ar$(i,4))<0.01 THEN GOTO 5075 (21251 

5070 PRINT#8,USING"\ (72651 


\ \ \ ####.## #####.## #####.##"; 
ar$ <i, 1);ar$(i,2);VAL(ar*(i,3));VALCar*(i, 

4));VALCarSCi,5)):j=j+l 

5075 i=i+l:IF j MOD 55=0 THEN se=se+l:GOSU C14821 
B 5500:j=l 


5080 VEND (3901 

5090 PRINT#8,STRINGS(64,):PRINT#8,USING (58061 
"Gesamtsumme der Bestellung: #######,## DM 
” ; sura 

5100 RETURN (5551 

5500 Druckkopf für Bestellung (21621 

5510 PRINT#8,CHR*(12) (10741 

5520 PEINT#8,TABC20)|CHR$C14);"Bestellung" (29551 
;CHR*(20) 

5530 PRINT#8,"BIckerei Konditorei" (34871 

5540 FRINT#8,"Otto Puserauckel" (25761 

5550 PRINT#8,"4240 Emmerieh-3, Flabesweg 7 (30521 

5560 PRINT#8,"Tel.:02828/1234" (13191 

5570 PRINT#8:PRINT#8,"Datum; ";dat*;TABC60 (43941 
);”Blatt ";se 

5575 PRINT#8;PRINT#8 (13141 

5580 PRINT#8,"Artikel (52301 

Einh Preis Menge Gesamt" 

5590 FRINT#8,STRINGS <64,"-") (16421 

5600 RETURN (5551 

6000 '*** Preise prozentual erhoehen (25691 

6010 PRINT "Um welchen Prozentsatz sollen (64451 
die Preise erhoeht werden?" 

6020 an=46:en=57:GOSUB 10000:pr=VAL(an*) (9691 

6030 1=1:IF pr<0 OR pr>99 THEN GOSUB 9800: (31701 

CLS:GOTO 6010 

6040 VHILE arSCi, 1)0"" (10911 

6050 alt=VAL(ar$Ci, 3) ) C8791 

6060 LOCATE 1,12:PRINT USING "Artikelnr. # (30851 
; i 

6070 neu=alt+alt*pr/100 (15421 

6080 neu=neu*100:neu=INT<neu):neu=neu/100 (29811 
6085 IF neu>999.99 THEN neu=999.99 r10871 

6090 ar$<i,3)=RIGHT* (STR*(neu),LENCSTK* Cne (28491 
u) )-l) 

6100 i=i+l:VEND (7581 

6110 CLS:RETURN (8321 

6200 '*** Preise prozentual verringern (19241 

6210 PRINT "Um welchen Prozentsatz sollen (69391 
die Preise verringert werden?" 

6220 an=46;en=57:GOSUB 10000;pr=VAL(an*) (9691 

6230 i=l:IF pr<0 OR pr>99 THEN GOSUB 9800; (31701 

CLS:GOTO 6010 

6240 VHILE arSCi, 1)0"" (10911 
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6250 alt=VAL<ar$ <i,3)) 

6260 LOCATE 1,12?PRINT USING "Artikelnr, # 
##" ; i 

6270 neu=alt-alt*pr/100 

6280 neu=nau*100:neu=INTCneu);neu=neu/100 
6285 IF neu<0,01 THEN neu=0.01 
6290 ar$(1,3)=RIGHT$ <STR$(neu),LBN<STRS Cne 
u)>-l> 

6300 i=l+l:VEND 
6310 CLS:RETURN 

6400 '*** Preise einzeln aendern 

6410 PRINT "Laufende Nummer des Artikels?” 

:an=46;en=57: GOSUB 10000:nr=VAL<an$> 

6420 PRINT USING "\ \ 

alter Preis: ###.## DM";nrSCnr,1>;VAL<ar$ 
<nr,3)) 

6430 PRINT "neuer Preis?":GOSUB 10000:IF V 
AL(an$>>999.99 OR VAL<anS)<0.01 THEN GOSUB 
4900:GOTO 6430 ELSE ar$(nr,3>=an$ 

6440 PRINT:PRINT "Weitere Preise aendern?" 

:wa$=" JN":GOSUB 9900 

6450 IF wa=2 THEN CLS:RETURN 

6460 CLS:LOCATE 1,10:GOTO 6400 

9000 '*** Datei speichern 

9010 GOSUB 11000 

9020 CLS#1?FRINT#1,inS;"Die Datei " ;na$i" 
wird gespeichertin®; 

9030 OPENOUT na$ 

9040 i=0 

9050 WHILE ar$<i , 1) 0'*"AND i<401 

9060 FOR j=l TO 5:PRINT#9,arSC1,j);NEXT j 

9070 i=i+l 

9080 WEND: CLOSEOUT 

9090 CLS#1:CLS:RETURN 

9100 '*** Datei lesen 

9120 GOSUB 11000:PRINT"Die Datei ”;naS;” w 

ird gelesen!";:FOR i=l TO 1999:NEXT i 

9125 1=0 

9130 OPENIN naS 

9140 WHILE NOT EOF 

9150 FOR j=l TO 5:INPUT#9,ar$(i,j>:NEXT j 

9160 i=i+l 

9170 WEND:CLOSEIN 

9175 arS(0,l)=na$ 

9180 CLS:RETURN 

9200 '*** Dateinamen einiesen 

9210 CLS:GOSUB 11000 

9220 a$="*.BST":!DIR,<2a$ 

9230 PRINT"Name der Datei ohne Extension e 
ingeben!” 

9240 an=48:en=122:GOSUB 10000 

9250 IF LEN(anS)>8 THEN GOSUB 9800;GOTO 92 

40 

9260 IF LEN(anS)<8 THEN anS=anS+" ”:GOTO 9 
260 

9270 na$=UFPER$ Can$)+".BST”:ar$(0,l)=na$ 
9280 RETURN 

9600 '*** Datei loeschen 

9610 CLS#1:PRINT#1,"Einen Moment bitte!”;: 
i=0 

9620 WHILE arS < i , 1)0"" AND i<401 
9630 FOR j=l TO 5:ar$<i,J>="":NEXT j 
9640 i=i+1:WEND 
9650 CLS#1:RETURN 
9800 '*** FEHLEINGABE 

9810 PRINT bi$;:PRINT#1,TAB<30);inS;fetS;" 

FEHLEINGABE ”;normt; inS; 

9820 FOR kk=l TO 1000:NEXT kk:PRINT bi$;:P 

RI NT#1 

9830 RETURN 

9900 '*** AUSWAHL 

9910 CLS#1:PRINT#1,"Auswahl wa$bi 

$; 

9920 y$=UPPER$CINKEYS>:IF yS=""THEN 9920 

9930 wa=INSTE<wa$,y$>:IF wa=0 THEN GOSUB 9 

800:GOTO 9910 

9940 CLS#1:RETURN 

10000 '*** Abfrage 

10010 PRINT#1,"Eingabe: ";:an$="" 

10020 y*=INKEY$:IF y$=""THEN 10020 
10030 IF ASC(y$)=13 THEN CLS#1:RETURN 
10032 IF ASC<y$>=127 THEN an$=LEFT$(an$,LE 
N<an$ >-1):CLS#1:PRINT#1,"Eingabe : ”;an$; 
10040 IF ASCCySXan OR ASC(yS)>en THEN PRI 
NT bi$;:GOTO 10020 


I879I 
C 3085] 


17993 

C2981] 

[8513 

[28493 

[7583 
C 8323 
[15603 
[45563 

[58663 


[70733 


[45723 

[25943 
[21163 
[9073 
[10383 
C 39503 


[6333 
[4203 
[12943 
[19003 
[4443 
[17823 
[7123 
[1144] 
[5047] 

C 420] 

[589] 

[18403 

[28863 

[4443 

[12093 

C8383 

C8323 

[1807] 

[576] 

[685] 

[53743 

[11353 
C 3464] 

[17513 

C16093 
[5553 
[11173 
[22053 

[12943 

[13593 

[7503 

[12423 

[17353 

[36943 

[32573 

C5553 
C 9463 
[29533 

[34563 

[44603 


[12423 
[ 12913 
[13833 
[26493 
[17493 
[37713 

[4028] 


BEKANNTMACHUNG 


Bei unserem 

allseits bekannten und beliebten Telefon-Service, 
dem »Heißen Draht«, 

können Sie Ihre Fragen und Anregungen von 

17.00 - 20.00 Uhr 

an die Redaktion 

von PC Schneider International richten. 

Auf Ihren Anruf freuen sich: 

Michael Ebbrecht (Hardware, Joyce), 
Stefan Ritter (Redaktion), 

Thomas Morgen (Programmierung) 
und Heinrich Stiller (Spiele/Adventures). 

Jeden Mittwoch am 

HEISSEH DRAHT 

Tel. (05651)87 02 


ZUBEHÖR“ 81 " 


Schneider-Computer 


ZUBEHÖR 



Deutschland: 


Für PCW JOYCE: 


- FD-2 (2. Laufw.), 1 MB 598, 

- RAM Erweiterung 

von 256 KB auf 512 KB 

(Original 257-er- 
Bausteine!) 129, 

- Bildschirmfilter 59, 


Für CPC 464, 664. 6128: 

- Bildschirmfilter 

Farbmonit. CTM 640/644 44. 

- Bildschirmfilter 

Grünmonitor GT 64/65 39, 


Für den neuen PC: 

- 2. Laufwerk, 360 KB 429,' 

- Hard-disk, 20 MB 

(Hardcard) 1398,- 

- RAM Erweiterung 

von 512 KB auf 640 KB 99,- 

- Bildschirmfilter 

für Monochrome- und 
Farbmonitor 59,- 

Das komplette Zubehör ist bei 
den Schneider-Computer- 
Händlern erhältlich. Händler¬ 
nachweis auf Anfrage. 


Weitere Händleranfragen willkommen! 


NEU: Papierführung für JOYCE-Drucker 39,- 


ABD Computer • Zettachring 12 • 7000 Stuttgart 80 • Tel. 0711-715 00 37 
Österreich: 


Wagner Electronics - Hauptstr. 171 • 3001 Mauerbach - Tel. 02 22-97 2166 
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1005® PRINT#1,y$;:an$=an$+y$:y$="":GOTO 10 [2289] 
020 

11000 '*** Laufwerkstatus abfragen (aus CP [3846] 
C International 01.86) 

11010 QUT<&FA7E),1:FOR 1=1 TO 1000:NEXT 1 [1828] 

11020 OUT(&FB7F) , 4 : OUT(&FB7F) , <-FBEK<8fA700 [1904] 
> + 2 ) : 

11030 st=INP<SFB7F):OUT(&FA7E),0 [1514] 

11040 rd=st AND 32 [781] 

11050 wp=st AND 64 [319] 

11060 IF rd=0 THEN PRINT#1,"Disk richtig e C52121 

inlegen! Weiter mit Taste":CALL &BB06:GOTO 
11000 

11070 IF wp=64 THEN PRINT#1Schreibschutz [75661 
auf Disk entfernen! Weiter mit Taste":CAL 
L &BB06: GOTO 11000 


11080 CLS#1:RETURN [1242] 

12000 '*** Quick Sort [12603 

12010 DIM sta<20,2):DIM help$<3) 11709] 

12020 ti=l [243] 

12030 sta<ti,1)=1:sta<ti,2)=i [1353] 

12040 WHILE ti<>0 [1208] 

12050 li=sta(ti,1):re=sta(ti , 2) [836]. 

12060 ti=ti-1 [226] 

12070 WHILE li<re [9533 

12080 i=li:j=re:pr$=ar$(<li+re)/2,1) [2497] 

12090 WHILE i<=j [8913 

12100 WHILE ar$(i, lXprS: i=i + l: WEND [19193 

12110 WHILE ar®< j , 1)>pr$:j =J-1:WEND [22883 

12120 IF i<=j THEN GOSUB 13000:i=i+l:j=j-l [20343 
12130 WEND [390] 

12140 IF i<re THEN ti=ti+1:sta<ti,1>=i:sta C21461 
(ti,2)=re 

12150 re=j [1583 

12160 WEND [3903 

12170 WEND [390] 

12180 ERASE sta;ERASE helpS [14043 

12190 RETURN [5553 

13000 '*** Tausch fuer Quicksart (8713 

13010 FOR k=l TO 3 [10833 

13020 heIpS <k> =ar$ <i,k) [8843 

13030 ar$(i,k>=ar$<j,k) [1473] 

13040 ar$<j,k)=help$(k) [990] 

13050 NEXT k [3733 

13060 RETURN [5553 

18000 '*** Erlaeuterung fuer fehlende Form [33633 
atierroutine 

18010 CLS [913 

18020 LOCATE 1,1 [6113 


18030 PRINT "Die Forraatierroutine ist in d [53523 
lesen Programm nicht " 

18040 PRINT "installiert worden, da diese C61943 
einer anderen Zeitschrift entnommen" 

18050 PRINT "wurde. Sollten Sie trotzdem I [45133 
nteresse an dieser Routine haben," 

18060 PRINT "so setzen Sie sich mit mir od C54483 
er der Redaktion CPC International" 

18070 PRINT "in Verbindung. Die Routine we C63933 
rde ich Ihnen dann zur Verfuegung ” 

18080 PRINT "stellen!" [1969) 

18090 PRINT "Weiter mit Taste!": CALL &BB06 [33813 
18100 CLS: RETURN [8323 

20000 '*** Systemmenüs [14823 

20010 LOCATE 30,4:PRINT fet$;"Systemmenü©" [2699] 
; norm® 

20020 LOCATE 26,6:FRINT"[I] Discinhalt anz C30983 
eigen" 

20025 LOCATE 26,7:PRINT "[F] Disc forraatie [37191 
ren" 

20030 LOCATE 26,8:PRINT"[L3 Datei loeschen [24043 


20040 LOCATE 26,9:PRINT"[U] Datei umbenenn [3832) 
en" 

20070 LOCATE 26,10:FRINT"CD3 Druckermenue" [34243 
20080 LOCATE 26,11:PRINT"[Ml Hauptmenue" [18993 
20090 waS="IFLUDM":GOSUB 9900 [5623 

20100 LOCATE 1,4:FOR i=l TO 10:PRINT le®; ; [28633 
NEXT i 

20110 IF wa=6 THEN RETURN [12703 

20120 ON wa GOSUB 20200,20800,20300,20700, C30583 

20400 

20130 !USER,0:GOTO 20010 [11673 

20200 '*** Discinhalt [20003 


20210 GOSUB 20500:CAT:PRINT:PRINT”Weiter m [55453 
it Taste";CALL *BB06iCLS;RETURN 


20300 '*** Datei loeschen 

20310 GOSUB 20500:CAT:PRINT:FRINT"Name der 
zu loeschenden Datei eingeben!" 

20320 an=32:en=126:GOSUB 10000:IF LBN<an$) 
>12 THEN GOSUB 9800:GOTO 20320 
20330 PRINT'*Datei wirklich loeschen <J/N>? 
":wa$="JN":GOSUB 9900:IF wa=2 THEN GOTO 20 
360 

20340 PRINT"Datei ";an$;" wird geloescht!" 

:!ERA,@nn$ 

20350 CLS 
20360 RETURN 

20400 '*** Druckereinstellung 

20410 PRINT TABC10);"Dieses Programm ist a 

uf den Drucker NLQ401 eingestellt!" 

20412 PRINT TABC10);"Zur Installation auf 
andere Drucker muss nur die " 

20414 PRINT TABC10);"Basiczeile 5005 und 5 
520 abgeaendert werden." 

20420 PRINT TABC10);"Weiter mit TASTE" 

20430 CALL &BB06:CLS:RETURN 

20500 -*** Userbereiche umschalten 

20510 LOCATE 30,4:PRINT fet$;"Bereichsausw 

ahl”|norm® 

20520 LOCATE 26,6:PKINT"[A3 Artikeldateien 

20530 LOCATE 26,7:PRINT"CB3 Bestelldateien 

20540 LOCATE 26,8:PR INT"[N3 Normal" 

20550 wa$="ABN":GOSUB 9900 

20560 LOCATE 1,4:FOR 1=1 TO 5:FRINT le$;:N 
EXT i 

20570 ON wa GOTO 20580,20590,20600 
20580 I USER,10:RETURN 
20590 !USER,5:RETURN 
20600 RETURN 

20700 '*** Datei urabenennen 

20710 GOSUB 20500:GOSUB 11000:LOCATE 1,1: C 

AT 

20720 PRINT:PRINT"Alten Namen der Datei ei 
ngeben!"; 

20730 an=46:en=122:GOSUB 10000 
20740 alna®=UPPER$(an®) : PRINT ” ";alna$ 
20750 PRINT "Neuer Name, der Datei eingeben 
!" ; 

20760 GOSUB 10000 

20770 nena$=UFPER$ (an$): PP.INT " " ; nena* 
20780 PRINT "tSoll die Datei " ; fet$i alna$; n 
orm®;" in ";fet®;nena$;norm* :" umbenannt w 
erden?" 

20790 wn$=”JN":GOSUB 9900:IF wa=2 THEN CLS 
:GOTO 20710 

20792 IF wa=l THEN ! KEN, @nena®, <?alna$ 

20794 CLS:RETURN 

20800 '*** Disc formatieren 

20810 LOCATE 30,4:PRINT fet®;"Diskette for 

raatieren";norn$ 

20820 LOCATE 30,6:FRINT ** [D3 Datenf ormat" 
20830 LOCATE 30,7:PRINT "[V3 Vendorformat 
-CP/M ohne System-" 

20840 LOCATE 30,8:PRINT "[S3 Systemraenue" 
20850 wa$=”DVS":GOSUB 9900 

20860 IF wa=3 THEN LOCATE 1,4:FOR i=l TO 7 
:PRINT le$;:NEXT:RETURN 

20870 PRINT:PRINT "Programmdisc aus LW A " 

;unter®;"entnehmen";norm®;" und Leerdisc e 
inlegen. Weiter mit SPACE!":CALL &BB06:GOS 
UB 11000 

20880 IF wa=l THEN PRINT#1,"Disc wird im " 

;fet$; "Datenformat" ; norm$; " formatiert!" : G 
OSUB 18000 

20890 IF wa=2 THEN PRINT#1,"Disc wird im " 

ifet$;"Vendorformat" ; norm®;” formatiert!" : 

GOSUB 18000 

20900 CLS#1 

20910 GOTO 20800 

30000 ' Fehlerbehandlung 

30005 IF ERR=18 OR ERR=32 THEN GOTO 31000 
30010 CLS#1:PRINT#1,"Fehler Nr. ”;ERR;" in 
Zeile "|ERL 

30015 FOR i=l TO 2000:NEXT 
30020 RESUME NEXT 

31000 Diskfehlerbehandlung t 

31010 CLS#1:PRINT#1," Diskfehler!!! Weiter 
mit Taste!":CALL &BB06:CLS#1 
31110 RESUKE NEXT 
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[63323 


[36253 

[63783 
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[5553 
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[42683 
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(28783 
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T!%*™»** Platinenservice 



Für Ihren CPC 



Die CPC-SCH NEIDER¬ 
WARE ist ein universelles 
Erweiterungssystem für 
CPC's auf der Basis des be¬ 
kannten ECB-Bussystems 
Dieses System läßt sich mit 
minimalen Adaptionsmaß¬ 
nahmen an alle Rechner 
mit Z80-CPU anschließen 
Für Ihren CPC brauchen 
Sie zunächst: 

1 Das passende Kabel 
(im Artikel beschrieben, 
wird im Platinenservice 
angeboten) 

2 Die Basisplatine (zur 
Umsetzung der Pinbe¬ 
legung CPC/ECB) 

Im Lauf der Serie wird für 
Einsteiger der Aufbau ei¬ 
nes 19”-Systems und die 
Integration der Karten in 
dieses Gehäuse beschrie¬ 
ben Die Basisplatine be¬ 
steht aus beidseitig kupfer¬ 
beschichtetem glasfaser¬ 
verstärktem Epoxydharz 
und ist durchkontaktiert 



Gesammelte Werke 

Die SCHNEIDERWARE oeganr in Heft 6/86 
Über den P ! atinenservice stehen Ihnen alle 
Karten, von der Basisplatine bis zur PIO Karte, 
zur Verfügung 


Die Preise: 

Basisplatine, unbestückt 24,90 DM 

dto, bestückt 62,90 DM 

Kabel 464/664 35,90 DM 

Kabel 6128 45,90 DM 

Centronics, unbestückt 17,90 DM 

dto, bestückt 79,90 DM 

V/24, unbestückt 29,80 DM 

dto bestückt 139,90 DM 

Netzteil, unbestückt 17,90 DM 

dto, bestückt 119,90 DM 

Trafo 79,90 DM 

Karte und Trafo 184,90 DM 

Hardware-Uhr, unbest 29,80 DM 

Hardware-Uhr, bestck 99,90 DM 


MIDI-Interface 

Dieses Interface stellt die Schnittstelle zwi¬ 
schen einem MIDI-fähigen Musikinstru¬ 
ment und Ihrem CPC dar Bauanleitung 
und eine Testsoftware sind in Heft 2/87 
veröffentlicht. Schniltsteke und Timerpla¬ 
tine werden nur komplett ausgeliefert; in 
der bestückten Version sind die für den Ti 
mer benötigten Klinkenbuchsen beigelegt 
und werden mit den Platinen in ein Gehäu¬ 
se nach Wahl eingebaut. Das benötigte 
Verbindungskabel ist aus Preisgründen 
nicht im Lieferumfang enthalten 


□ie preise- 

Platinen, unbestückt 39,90 DM 
Interface kompl bestückt 198.00 DM 


Die Einsteckkarten sind 
einseitig beschichtet und 
aus dem gleichen Material 
wie die Basisplatine. Die in 
den Fertiggeräten verwen¬ 
deten Bausteine sind von 
bester Qualität; die fertigen 
Geräte sind geprüft Die in 
Heft 7/86 vorgestellte 
Centromcs-Parallelschnitt- 
stelle ist gegenüber dem 
CPC-Druckerport vollstän¬ 
dig und vollkompatibel zu 
allen Geräten mit Centro- 
nics-Anschluß 


Zahlungsbedingungen: 



PIO-Karte 

Diese Karte, ein (Parallel Input-Out- 
put)-Baustein, ermöglich! die Eingabe be¬ 
liebiger Intormationen über Schalter o ä 
unö die Ansteuerung beliebiger Periphe¬ 
rie über 48 (1) Kanäle und ist absolui frei 
programmierbar Die Programmierung 
und'der Aufbau der Karte sind in SCHNEI¬ 
DERWARE #6, Heft 12/86, beschrieben. 
Steuer- Meß- und Regelvorgänge aller Arl 
können mit Hilfe dieser Karte und geeigne¬ 
ter Software realisiert werden Für 24 der 
48 Kanäle stehen in der Fertigversion 
Leuchtdioden zur Zustandsanzeige zur 
Verfügung 

Die Preise: 

Platine, unbestückt 29,80 DM 

Karte, geprüft 198.90 DM 


Gesamtpreis zuzüglich 
5,— DM Porto/Verpak- 
kung (im Ausland 8,— DM 
Porto/Verpackung). 

Am einfachsten per Vor¬ 
kasse (Verrechnungs¬ 
scheck) oder als Nachnah¬ 
me zuzügl der Nachnah¬ 
megebühr (in das Ausland 
nicht möglich) 


Bitte Postkarte im 
Heft benutzen! 


Platine, unbestückt 

SCHNEIDERVVARE ist in drei Versionen 
für Sie verfügbar. Sie können nach Bau- 
olan selbst bauen, die fertig bestückten 
und geprüften Karten über den Platinen¬ 
service erhalten oder die unbesluckte 
Platine erwerben Diese werden in Indu¬ 
striequalität gefertigt, sind verzinnt und 
gebohrt; doppelseitig beschichtete Pla¬ 
tinen sind chemisch durchkontaktiert 
und geprüft Hierbei haben Sie den Vor¬ 
teil, die Platine nicht selbst herstellen zu 
müssen, jedoch die Bestückungskosten 
zu sparen und die Bauteile selbst einzu¬ 
kaufen 


PC Schneider International 

Postfach 250, 3440 Eschwege 
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Ein herzliches Dankeschön... 



möchten wir an 
dieser Stelle all 
denjenigen aus¬ 
sprechen, die 
durch ihre aktive 
Mitarbeit an un¬ 
serer in Heft 
11/86 durchge¬ 
führten Leserbe¬ 
fragung dazu 
beigetragen ha¬ 
ben, auch wei¬ 
terhin die PC In¬ 
ternational an 
die Bedürfnisse 
unserer Leser 
anzulehnen. 


Die Reaktion auf die Leserbefragung war 
einfach super, die abgeleiteten Ergebnisse 
möchten wir Ihnen hier in Kurzform wie¬ 
dergeben. 

In einigen Beiträgen haben wir bereits ver¬ 
sucht. die gewonnenen Erkenntnisse um¬ 
zusetzen, viele interessante Dinge sind zu¬ 
dem in Vorbereitung. 

Erstaunlich war für uns zunächst die Tatsa¬ 
che, das etwa 40% aller Leser auch beruf¬ 
lich mit Computern zu tun haben. Die Tat¬ 
sache. daß privat ein Schneider Computer 
genutzt wird, belegt, daß sämtliche 
Schneider Rechner auch für einen kom¬ 
merziellen bzw. semiprofessionellen Ein¬ 
satz tauglich sind. Nicht zuletzt kann dies 
durch das breite Software-Angebot reali¬ 
siert werden. 

In punkto Peripherie stehen Drucker in¬ 
zwischen an erster Stelle. Neben ca. 65% 
aller Rechner steht auch ein Drucker, der 
damit den Spitzenplatz noch vor Floppys 
(ca. 58%) und Joystick (ca. 60%) ein¬ 
nimmt. 

Die Bewertung der einzelnen Rubriken fiel 
derart positiv aus, daß wir hier gar nicht 
näher darauf eingehen wollen. Nur soviel 
sei gesagt: der absolute Renner sind unse¬ 
re beliebten Tips & Tricks, die es auch wei¬ 
terhin in gewohnter Form und Qualität ge¬ 
ben wird. 

Aufschlußreich war das Thema Program¬ 
miersprachen: Hier liegt BASIC unange¬ 
fochten vorn, es folgen Assembler und Pas¬ 
cal. Überraschend war allerdings, daß an¬ 
schließend LOGO genannt wurde — diese 
Programmiersprache haben wir, zugege¬ 
ben. bisher etwas vernachlässigt. Auch 
hier ist für die Zukunft etwas geplant, über 
Einsendungen von LOGO-Programmen, 
Tips etc. würden wir uns sehr freuen. 

Einige Leser haben mit den veröffentlich¬ 
ten Listings ihre Mühe. Mal ist die Pro¬ 


grammbeschreibung nicht ausführlich ge¬ 
nug, mal wären besondere Hinweise zum 
Abtippen vonnöten. Hier geloben wir Bes¬ 
serung und werden verstärkt unser Augen¬ 
merk auf die Listings richten. 

Apropos Listing: Etwa 90% aller Zuschrif¬ 
ten wünschen sich mehr Anwenderpro¬ 
gramme in der PC International. Beispiel¬ 
haft steht hier wohl unser Textprogramm 
»CONTEXT«, das mehr als 50% aller Le¬ 
ser zum besten Listing wählten. 

Wir werden uns bemühen, auch weiterhin 
qualitativ hochwertige und vielseitig er¬ 
setzbare Programme zu veröffentlichen. 

Nach wie vor scheint die Computerwelt 
eine Domäne des männlichen Geschlechts 
zu sein, nur knapp 2% aller Leser sind 
Frauen. Eine Trendwende scheint hier 
noch nicht in Sicht. Ein weiteres Ergebnis, 
das wir Ihnen nicht vorenthalten wollen 
und das besonders die Fa. Schneider er¬ 
freuen dürfte, ist die fast uneingeschränk¬ 
te Zufriedenheit der Anwender mit der 
Qualität der Hardware. Kaum ein 
Schneider-Rechner, der mal zur Reparatur 
mußte, eing auch für die Zukunft vielver¬ 
sprechende Tatsache. 

Alles in allem sind Schneider-User zufrie¬ 
dene Computer-Anwender, deren Informa¬ 
tionsbedarf einerseits durch den immer ak¬ 
tuellen Soft- und Hardwaremarkt, anderer¬ 
seits durch entsprechende Fachliteratur ab¬ 
gedeckt wird. 

So ist es auch zu verstehen, daß der neue 
Schneider PC nicht nur von Einsteigern 
und Umsteigern von anderen Systemen, 
sondern auch von Besitzern der CPC- bzw. 
Joyce-Serie ins Auge gefaßt wird. Qualität 
setzt sich durch und hat in vielen Fällen 
(man kennt das z.B. aus der HiFi- oder 
auch aus der Autobranche) Markentreue 
zur Folge. 


Abschließend geben wir noch die Gewin¬ 
ner bekannt, die unsere Glücksfee Heike 
Schmalenberger aus dem großen Topf aller 
Einsendungen gezogen hat. 

Den Hauptgewinn, einen brandneuen PC 
1512 erhält Matthias Osterloh, in 2800 
Bremen 1. 

Herzlichen Glückwunsch und viel Spaß 
mit dem neuen Computer! 

Des weiteren wurden folgende Gewinner 
ermittelt: 

Martin Schoel, 7505 Ettlingen (15 Programme nach 

Wahl von der Fa. Schuster, Castrop-Rauxel) 

Wolfgang Aufrecht, 8911 Weil 

Gerhard Krieg, 8080 Fürstenfeldbruck 

Gerhard Kühner, 7913 Senden (je IxComal-Diskette) 

Rix Groenboom, NL-9306 Roden 

Ralf Bongartz, 4236 Hamminkeln 4 

Klaus-Dieter Hanslik, 6700 Ludwigshafen 25 

Frank Wiellenke, 4600 Dortmund 50 

Gerhard Konther. 6128 Höchst 

(je 1 Handbuch EUMEL) 

Elfriede Menzel, 8228 Freilassing 
Ludwig Hauer, 8391 Hutthurm 
Michael Weiß, 2000 Hamburg 71 
Patrick Köhne, 4755 Holzwickede 
Bernd Frankenbach, 6274 Hünstetten 2 
(je i Demo-Disk Screen-Box von CWL) 

Jürgen Götz, 6475 Glauburg 1 
Horst Jacoby, 4300 Essen 1 
Richard Scheib, 6749 Niederotlerbach 
Markus Biniek, 2112 Jesteburg 
Werner Huber, 7601 Ortenberg 
(je eine Serie 77 Diskette) 

Michael Völkner, 3000 Hannover 71 
Raines Brinckmann. 4900 Herford 
Marietta Häuser, 6464 Linsengericht 4 
Alex Sievi, J00Ö Berlin 47 
Harald Rönne, 1000 Berlin 41 
Daniel Schneider, CH-4153 Reinach 
Olaf Richter, 1000 Berlin 20 
Thomas Kalbrunner, 6906 Leimen 
Alexander Spanner, 4018 Langenfeld 
Leopold Büntin, 6000 Frankfurt 
Martin Kohzing. 2000 Hamburg 16 
Walter Engels. 4600 Dortmund 
Jochen Schutzbach, 7201 Mahlstetten 
Günter Schöne, 8755 Alzenau 
Andreas Boebe, 5042 Erftstadt 
(je 1 Fachbuch) 

Günter Schütt, 2432 Lensahn 
Hanspeter Nestle, 7300 Esslingen 
M.Spieles, 6501 Essenheim 
Jan Kaltenberg, 6945 Hirschberg 2 
Juergen Theis, 6340 Dillenburg 
Andreas Trost, 6301 ??? 

Jens Claasen, 4400 Münster 
Michael Berberich, 6803 Edingen 
Rüdiger Oberle, 6842 Bürstadt 
Bernd Müller, 6837 St. Leon-Rot 1 
(je 1 GAC Adventure-Generator) 

H.J. Himmler, 6802 Ladenburg 
Dietrich Wiborg, 2000 Norderstedt 
Lars Haiduk, 6800 Mannheim 
C. Wagner, 5000 Köln 60 
Peter Ihler, 5020 Frechen 4 
Manfred Maier, 7209 Wehingen 
Elmar Russ, 7903 Laichingen 1 
Thorsten Heil, 6123 Bad König 
Heiner Herling, 2000 Hamburg 65 
Jan Protoschill, 3015 Wennigsen 
(je 1 Copyshop) 

H.J. Schönenberg, 5300 Bonn 3 
Jörg Krabel, 3160 Lehrte 
Werner Egert, 5000 Köln 
(je Ix Quick.Data) 

Klaus Schübel. 8129 Wessobrunn 
Friedrich Werres. 5024 Pulheim 
Walter Pfeifer, 4409 Havixbeck 
(je lxQuick-Bill) 
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In fünfundsiebzig verschiedenen Höhlen hat 
ein böser Geist die Fragmente des zer¬ 
schmetterten Schwertes Anduril versteckt. 
Sind Sie geschickt genug alle Teile einzu¬ 
sammeln? Ein kniffeliges Geschicklichkeits¬ 
spiel. Joystick und Tastatursteuerung. 


Auf Mörderjagd im alten Schloß. War wieder 
der Butler der Mörder, oder sollte etwa der 
Hausarzt seine Finger im Spiel haben? Sie 
sammeln Indizien und jagen den kaltblütigen 
Killer. Denksport at it's best! 


Auf der neuen GAMEBOX finden Sie pro 
Ausgabe zwei Klasse Spiele aus dem Berei¬ 
chen Strategie-, Action-Adventure und Reak¬ 
tionsspiel. 

Die GAMEBOX kostet pro Ausgabe 19,- DM, 
als Kassette bzw. 29,- DM als Diskette zzgl. 
3,- DM Porto und Verpackung. Sie können 
die GAMEBOX per Vorkasse oder Nachnah¬ 
me bestellen. Im Falle der Nachnahme kom¬ 
men die entsprechenden Nachnahmegebüh¬ 
ren hinzu. 

Bitte Bestellkarte benutzen 


Folgen Sie dem Abenteurer Terry McStyle in 
die unterirdischen Labyrinthe des Dungeon 
Doom’s. Eine Welt voller phantastischer We¬ 
sen erwartet Sie. Ein Icon-gesteuertes Grafik- 
Abenteuer. Joystick und Tastatursteuerung. 


Barney Ballhunter, der König der Hammer¬ 
schwinger, hat es nicht leicht. Aber vielleicht 
wollen Sie ihm bei seiner Jagd nach den 
Gasballons helfen? Also, in die Hände ge¬ 
spuckt, und den Hammer schwingen. 100% 
Maschinencode-Action. Joystick und Tasta¬ 
tursteuerung. 


DMV-Verlag 

Fuldaer-Straße 6 ■ 3440 Eschwege ■ Telefon (0 5651) 87 02 




















r~Bücher 


Miedel/Kotulla: 

Das große CPC- 
Arbeitsbuch 
Franzis-Verlag 1986, 
453 Seiten, 

ISBN 3-7723-8421-8, 
Preis: DM 68,- 


Francs 

Computer-Prax» 


Miedel/Kotulla 

Das große 
CPC-Arbeitsbuch 



Das hier zu beschreibende 
Buch trägt den Namen zu 
Recht. 

Für alle Schneider CPC Com¬ 
puter werden so viele nützli¬ 
che Arbeitshilfen und Routi¬ 
nen angeboten, daß man schon 
fast von einem Nachschlage¬ 
werk »Tips & Tricks« sprechen 
kann. 

Daß bei den breitgefacherten 
Themen auch die Grundlagen 
erläutert werden, ist ein weite¬ 
res Plus des CPC-Arbeits¬ 
buches. 

So reicht das Spektrum der 
Themen von allgemeinen 
Grundlagen der CPC-Intemas 
bis hin zu kompletten Pro¬ 
grammen wie z.B. Disassem¬ 
bler, Reassembler, Variablen- 
lister etc. 

Eine wahre Fundgrube bieten 
die zahlreichen Hilfsroutinen, 
die dem geneigten Program¬ 
mierer Möglichkeiten der ef¬ 
fektiven Programmierung an 
die Hand geben. Nur einige 
Beispiele aus dem Inhalt: 
REM-Killer, Lesen von frem¬ 
den Diskformaten, Sprites, 
Kassetteninhaltsverzeichnis 
etc. 


Übrigens sind alle Programme 
auch auf Diskette beim Verlag 
erhältlich. 

Fazit: Das vorliegende Buch 
zeichnet sich durch eine klare 
Gliederung und leicht ver¬ 
ständliche Dokumentation 
aus. Die zahlreichen Program¬ 
me und Routinen sind durch¬ 
weg an die Praxis angelehnt 
und erweitern die Program¬ 
miermöglichkeiten erheblich. 


Und DM 48,— sind sicherlich 
ein guter Preis für dieses emp¬ 
fehlenswerte Buch. 


B.R. Christenseil: 

Das Comal-80 Buch 
Oldenbourg Verlag 1986 
269 Seiten 
ISBN 3-486-20208-1 
Preis: DM 29,80 


Tabellenkalkulation 
Hanser Verlag 1986 
127 Seiten 
ISBN 3-446-14573-7 
Preis: DM 48,- 



Die Tabellcnkalkulation Mul¬ 
tiplan von Microsoft ist eine 
der weitverbreitetsten der 
Welt. Dieses Buch führt 
Schritt für Schritt in die Ar¬ 
beitsweise und Handhabung 
von Multiplan ein, ohne daß 
Vorkenntnisse vorausgesetzt 
werden. 

Die dem Buch beiliegende 
Diskette (5.25“ MS-DOS) 
beinhaltet eine Kurzversion 
von Multiplan, anhand derer 
die im Buch aufgezeigten Bei¬ 
spiele nachvollzogen werden 
können. 

Somit kann sich auch der In¬ 
teressierte einen Eindruck ver¬ 
schaffen, ob Multiplan seinen 
Ansprüchen genügt, und ist 
vor einer möglichen Fehlinve¬ 
stition gefeit. 


Comal ist eine Programmier¬ 
sprache, die Elemente von 
BASIC und Pascal miteinan¬ 
der verbindet. Eine struktu¬ 
rierte Programmierung ist so¬ 
mit möglich, sicherlich auch 
ein Grund für die Aktualität, 
die Comal zur Zeit besitzt. 


RR (.IsrisiMWii 

Das 

COMAL-80 

Buch 

Vtutä bn»j*itt dir* 

Mruktisrjcite Pn^r.uiimici uwg 


Oldco \ue,u» 


Einen kompetenteren Autor 
als B.R. Christensen kann man 
sich für ein Comal-Buch wohl 
kaum vorstellen, da ebenjener 
Christensen zusammen mit 
Benedict Loefstaedt diese Pro¬ 
grammiersprache im Jahre 
1973 definiert hat. So eignet 
sich dieses Buch nicht nur ide¬ 
al für Comal-Einsteiger, son¬ 
dern dient auch Alteingesesse¬ 
nen als unentbehrliches Nach¬ 
schlagewerk. Das didaktisch 
sehr gut gemachte Buch zeigt 
anhand von zahlreichen Bei¬ 
spielen und .damit verbunde¬ 
nen Übungsaufgaben Syntax 
und Arbeitsweise von CO¬ 
MAL auf. 


Die im Buch aufgezeigten Bei¬ 
spiele sind zwar für den Com- 
modore 64 geschrieben, las¬ 
sen sich jedoch leicht auch an 
den Schneider CPC anpassen. 
Hilfreich zur Hand geht hier 
auch die Fa. Beiz (ehemals 
Comalgruppe Deutschland), 
dort sind auch einige Hilfsmit¬ 
tel erhältlich. 


Digital Research: 
GSX-Handbuch 
Markt & Technik 
Verlag 1986 
150 Seiten 

ISBN 3-89090-373-8 
Preis: DM 39,- 

In der Reihe »Originaldoku- 
mentationen« stellt der Markt 
& Technik Verlag nun auch In¬ 
formationen zur grafischen 
Schnittstelle GSX zur Verfü¬ 
gung. 

Im »Programmer’s Guide« und 
dem »User’s Guide« (beide auf 
englisch) werden alle theore¬ 
tischen Grundlagen und Funk¬ 
tionen von GSX abgehandelt. 

Dies geschieht im DR- 
typischen Stil: eine Fülle von 
Informationen übersichtlich 
präsentiert, aber keine prakti¬ 
schen Hinweise anhand von 
Beispielen. Praktische Hin¬ 
weise soll es in einem »Refe¬ 
rence Manual« geben, dies ist 
aber nicht im vorliegenden 
Band enthalten (obwohl das 
Backcover diesen Eindruck er¬ 
weckt). 

Fazit: Eine wichtige Informa¬ 
tionsquelle für alle, die unter 
GSX Grafik programmieren 
wollen (oder müssen), aber 
auch eine interessante Lektü¬ 
re für alle, die wissen wollen, 
wie GSX (und damit auch sol¬ 
che Programme wie DR Draw 
oder DR Graph) funktio¬ 
nieren. 

Vorkenntnisse sind dringendst 
zu empfehlen, denn die Mate¬ 
rie ist wirklich etwas trocken 
und theoretisch. 
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A. Dripke: 

Schneider CPC 464, 664, 
6128 Programmbegleiter 
Vieweg Verlag 1986 
69 Seiten 

ISBN 3-528-04490-x 
Preis: DM 29,80 



Der Programmbegleiter ent¬ 
hält in übersichtlicher Form 
die Syntax und Aspekte der 
BASIC- und Assemblerpro¬ 
grammierung. 

Dieses Buch kann man als 
Kurzreferenzsammlung be¬ 
zeichnen. die für die Program¬ 
mierung in BASIC und As¬ 
sembler einen schnellen Über¬ 
blick über Befehle, Speicher¬ 
belegung etc. gibt. 

Alles in allem nichts Neues, 
sondern für alteingesessene 
Programmierer Bekanntes im 
neuen Gewand. 

Dr.FJ. Kauffels: 

Personal Computer 
und lokale Netzwerke 
Markt & Technik 1986 
250 Seiten 
ISBN 3-89090-176-x 
Preis: DM 78,- 

Was vor Jahren noch den rie¬ 
sigen EDV-Giganten Vorbehal¬ 
ten war, setzt sich in zuneh¬ 
mendem Maße auch in Klein- 
und Mittelbetrieben durch. 
Die Rede ist von der Vernet¬ 
zung der Personal Computer 
mittels lokaler Netze, soge¬ 
nannter LANs. Mit Hilfe die¬ 
ser LANs lassen sich enorme 
Datenmengen von Computer 


Matkt&lechnik g 





zu Computer schaufeln, aus- 
werten, speichern, wieder zu¬ 
greifen etc. Diese hochkom- 
plizierte Technik erfordert ei¬ 
niges an EDV-Grundwissen, 
welches für das Lesen dieses 
Buches ebenfalls unbedingt 
vorhanden sein muß. Der Au¬ 
tor hat sich bemüht, eine leicht 
verständliche Einführung in 
die Grundzüge der Mehrplatz¬ 
technik zu geben, was ihm für 
den allgemeinverständlichen 
Teil auch sehr gut gelungen 
ist. Um jedoch durch den rein 
technischen Teil des Buches 
durchzusteigen, braucht es 
schon einiges an Geduld und 
Konzentration. Hat man sich 
dann aber noch nicht aufgege¬ 
ben, wird man durch die sehr 
üppigen und präzisen Informa¬ 
tionen, die wohl in keinem an 
deren Buch in dieser Form zu 
finden sind, versöhnt. 
Abgerundet wird die wie ge¬ 
sagt sehr komplizierte, aber 
umso mehr hochinteressante 
Materie durch Testberichte 
von 10 verschiedenen LANs. 

Softwareführer ’87 
für Personalcomputer 
Rossipaul Verlag 1986 
ISBN 3-87686-027-x 
Preis: DM 28,- 

Nun liegt die insgesamt dritte, 
überarbeitete Auflage des 
Softwareführers vor. Immer¬ 
hin sind gegenüber der vergan¬ 
genen mehr als 1200 Program¬ 
me hinzugekommen, die im 
alphabetischen Programm¬ 
und Anbieterverzeichnis er¬ 
faßt wurden. 


So beinhaltet das Software- 
Sammelsurium nun insgesamt 
ca. 2700 Programmbeschrei¬ 
bungen nach Branchen und 
Anwendungen gegliedert. 



Merziger/Wirth: 
BASIC-Programme zur 
höheren Mathematik 
C. Feldmann Verlag 1986 
191 Seiten 

ISBN 3-923923-15-5 
Preis: DM 16,80 


BASIC PROGRAMME 

ZUR 

HÖHEREN MATHEMATIK 


l)r Gertiard Megger 
Dr ThoTna* Wirth 


Studenten und Mathematikin¬ 
teressierte aufgepaßt! 

Über 60 Programme der höhe¬ 
ren Mathematik werden in 
diesem Fachbuch vorgestellt 
und erläutert. Die behandelten 
Themen reichen dabei von Po¬ 
lynomrechnung über Integra¬ 
tion- und Matrizenrechnung 
bis hin zur Vektorrechnung 
(u.v.m.). 

Alle Themen werden sorgfäl¬ 
tig mit theoretischen Grundla¬ 
gen versehen, die zahlreichen 


und sehr gut gemachten Bei- 
spielaufgaben zielen auf einen 
raschen Lernerfolg ab. 

Die vorgestellten Programme 
laufen problemlos auf dem 
Schneider CPC, lassen sich 
aber auch für Rechner der 
MS-DOS Serie verwenden. 
Übrigens ist beim Verlag eine 
Diskette (DM 24,80 für 3 
Zoll: DM 17,80 für MS-DOS) 
erhältlich, auf der alle Pro¬ 
gramme vorhanden sind. 

Ein empfehlenswertes Buch 
mit vielen interessanten Algo¬ 
rithmen und Anregungen. 

H.J. Sacht: 

Was der Personal¬ 
computer alles kann 
Vogel Verlag 1986 
304 Seiten 

ISBN 3-8023-08880-8 


Was der 

•• raonalcomputer 
alles kann 


l.im-' lei< liifdl'jlii Iv KinlViliniuii 



Tragen Sie sich mit dem Ge¬ 
danken, einen Computer an¬ 
zuschaffen? Und haben Sie 
überhaupt keine Ahnung, wie 
ein Computer arbeitet, wo 
überhaupt und wenn, dann 
möglichst sinnvoll und effek¬ 
tiv eingesetzt werden kann? 
Wenn ja, dann ist dieses Buch 
genau das richtige für Sie. 
Der Autor führt Schritt für 
Schritt in die Materie der EDV 
und den damit zusammenhän¬ 
genden Faktoren ein. Im »Ein¬ 
gemachten« gibt es dann noch 
einen Schnellkurs in BASIC 
und eine Erläuterung des soge¬ 
nannten EDV-Chinesisch. 
Alles in allem ein überzeugen¬ 
des Buch, nicht zuletzt macht 
die leicht verständliche Aus¬ 
drucksweise des Autors das 
Lesen für Laien interessant. 
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I Bericht 



»Mein Computer 
unterhält sich« 

Folge 1 


Mit dieser Ausgabe beginnt in PC In¬ 
ternational eine neue Serie für den 
CPC 464/664/6128, sowie für Joyce 
und den neuen Schneider PC 1512. In 
dieser Serie wollen wir Ihnen erklä¬ 
ren, was genau DFÜ ist, wie man 
DFÜ betreibt und was DFÜ kostet. 
Wir wollen nicht speziell auf eine be¬ 
stimmte Schnittstelle eingehen, son¬ 
dern allgemeine Informationen zur 
Datenfernübertragung vermitteln. 

Das Thema Datex-P und Mailboxen 
wird ebenfalls behandelt. Dabei wollen 
wir Ihnen auch einige sehr interessan¬ 
te Mailboxen anhand einer Beispielsit¬ 
zung vorstellen, und wie man mit die¬ 
sen Mailboxen kommuniziert, bezie¬ 
hungsweise wie diese bedient werden. 
Was Datex-P Ihnen bringt, was es ko¬ 
stet und wie Sie Datex-P bedienen, er¬ 
fahren Sie ebenso, wie die vielen 
Fremdwörter im DFÜ-Fachjargon; 
oder wissen Sie etwa, was der Unter¬ 
schied zwischen einer »Mehlbox« und 
einer »Mailbox« ist? 

Natürlich ist das noch nicht alles, was 
wir in unserer Serie »Mein Computer 
unterhält sich« behandeln wollen, es 
gibt noch viel mehr Bereiche. Lassen 
Sie sich doch einfach einmal überra¬ 
schen. 


Was ist DFÜ? 

Was ist Datenfernübertragung, kurz 
DFÜ genannt? In unserer heutigen Zeit 
werden Daten sehr schnell benötigt. 
Der Postweg ist in der Regel zu lang¬ 


sam, in der Geschäftswelt müssen zum 
Beispiel wichtige Manuskripte schnell 
vorliegen. Wie geht das? 

Im Prinzip ganz einfach. Durch, je 
nach System, elektrische und/oder aku¬ 
stische Impulse werden Bits übertra¬ 
gen. Bits über die Telefonleitung wer¬ 
den akustisch übermittelt. Soll eine lo¬ 
gische »1« übertragen werden, so ist der 
Ton höher, als bei einer logischen »0«. 
Welche Frequenz welchen Kanal be¬ 
sitzt, hängt von der Form ab, in der 
übertragen wird. Der Duplexbetrieb 
(was das genau ist, erwähnen wir spä¬ 
ter) verwendet bei 300 Baud (Bits pro 
Sekunde) folgende Frequenzpaare: 

Originate und Answer Modus 


Kanal 1: 980 Herz und 1180 Herz 
Kanal 2: 1650 Herz und 1850 Herz 
Nehmen wir an, Sie rufen eine Mailbox 
an, um Daten zu empfangen. 

Jetzt kann es aber passieren, daß die 
Mailbox Daten schickt, während Sie 
noch welche senden. Die logische 
Schlußfolgerung wäre: es gibt einen 
»Datensalat«. Deshalb die Idee mit den 
zwei Kanälen. Kanal 1 entspricht dem 
»Originate Modus« und Kanal 2 dem 
»Answer Modus«. Wer welchen Kanal 
benutzt, müssen Sie vorher mit Ihrem 
Computer-Partner absprechen. Ver¬ 
wenden Sie nämlich die gleichen Kanä¬ 
le, ist eine Datenübertragung nicht 
möglich. 

Mailboxen befinden sich fast immer im 
»Answer Modus«. Sie müssen also, be¬ 


vor Sie eine Mailbox anrufen, Ihren 
Akustikkoppler, oder Ihr Modem auf 
»Originate« schalten. Schauen Sie hier 
in der Betriebsanleitung Ihres Gerätes 
nach, wo sich der Schalter zum Umstel¬ 
len der Modis befindet. 


Der CPC und der Rest 


Damit auch ein Schneider CPC 6128 
mit einem IBM PC kommunizieren 
kann, hat man sich etwas einfallen las¬ 
sen. Sicherlich kennen Sie den »Ame¬ 
rican Standard Code for Information 
Interchange«, kurz ASCII-Code ge¬ 
nannt. Dieser Code legt fest, welche 
Bit-Folge zum Beispiel der Buchstabe 
»A« hat. Der Dezimalcode für das gro¬ 
ße »A« lautet 65. Binär ausgedrückt 
»1000001«. Um den Buchstaben »A« zu 
übertragen, wird einmal eine »l«, fünf¬ 
mal eine »0« und noch einmal eine »1« 
übertragen. Also Bits. Wie Bits übertra¬ 
gen werden, wissen Sie ja schon! Jetzt 
haben wir den Buchstaben »A« an die 
Gegenstelle, in unserem Beispiel den 
IBM PC, übermittelt. 


ASCII macht es möglich 

Der ASCII-Code ist nur bis 127 ge¬ 
normt, also jeweils nur ein Sieben-Bit- 
Wert. Der Schneider Computer ist aber 
in der Lage, mehr als sieben Bits zu 
empfangen, beziehungsweise zu sen¬ 
den. Den achten Datenbit benötigt man 
für andere Aufgaben, oder für die 
Übertragung von Maschinencode- 
Programmen — was auch geht, dazu 
später aber mehr. 

Sicherlich denken Sie jetzt, daß das 
Übertragen von Daten auf diese Weise 
langsam vor sich geht, schließlich muß 
der Computer siebenmal »piepsen«. Es 
sind durch diese Methode Übertra¬ 
gungsgeschwindigkeiten bis zu 19200 
Baud möglich, was schon eine ganze 
Menge ist. Baud heißt nichts anderes 
als »Bits pro Sekunde«. Über eine Te¬ 
lefonleitung, und das ist der Normal¬ 
fall, sind solche Geschwindigkeiten je¬ 
doch Utopie, jedenfalls noch solange 
die »Analogen«, Telefonleitungen der 
Deutschen Bundespost, in Betrieb sind. 


Die Geschwindigkeit 

Baudraten von 1200 Baud sind jedoch 
ohne größere Probleme erreichbar. Üb- 
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lieh sind aber 300 Baud — auch noch 
eine beachtliche Geschwindigkeit. 

Als »Faustregel« kann man sagen: die 
Anzahl der Bytes durch 37,5 dividiert, 
ergibt die Übertragungsdauer in Sekun¬ 
den. Ein 1000 Zeichen umfassender 
Text benötigt danach etwa 27 Sekun¬ 
den. Aber wie gesagt, es handelt sich 
dabei um eine »Faustregel«. 

Die Datenverarbeitung 

Was macht aber der Computer, wenn er 
die Daten empfangt? Dieses Problem 
bringt uns jetzt schon zu einem kniffe¬ 
ligen Teil — den Übertragungsproto- 
kollcn. Bleiben wir dabei, daß aus¬ 
schließlich ASCII-Zeichen gesendet 
oder empfangen werden. Es gibt zwei 
Arten ASCII-Texte zu verarbeiten - die 
erste ist wohl die einfachste. 

Die Gegenstelle sendet ein Zeichen, der 
Schneider Computer empfängt dieses 
Zeichen und schreibt es schlicht und 
einfach in sein RAM, also in den Ar¬ 
beitsspeicher. Das Zeichen geht also 
nicht verloren, es wird in den Speicher 
geschrieben. Der Speicher ist jedoch 
nur begrenzt vorhanden. Das Speicher¬ 
platzproblem dürfte wohl nur für die 
CPC' ein wirkliches Problem sein. 
Zieht man den benötigten Speicherplatz 
ab, den das Terminal-Programm benö¬ 
tigt. so bleiben noch gut 35 KByte zur 
Verfügung. Wie schnell sind aber die¬ 
se 35840 Bytes voll! 

Die Übertragungsprotokoüe 

Dieses Problem bringt ein einfaches 
Übertragungsprotokoll mit sich. Es 
heißt XON/XOFF Protokoll. Wir wol¬ 
len mit einem Beispiel beginnen. Sie 


wollen 100 kB Text empfangen, und 
diesen selbstverständlich nicht nur le¬ 
sen, sondern auch auf das Speicherme¬ 
dium »Diskette« speichern. 


Das XON/XOFF Protokoll 


Die Gegenstelle überträgt den Text und 
Ihr Schneider Computer empfängt die¬ 
sen. Die Daten schreibt der Computer 
in den »Floppy-Buffer«. 

Jetzt muß der Terminalcomputer ab- 
speichem, weil der Buffer überfüllt ist. 
Beim Abspeichern kann jedoch der 
Computer, wegen der Interruptsper¬ 
rung, nichts anderes mehr machen, die 
Gegenstelle sendet aber unbefangen 
weiter, weil Sie nicht weiß, daß unser 
Schneider Computer gerade abspei¬ 
chern muß. Die Daten gehen verloren. 
Deshalb das XON/XOFF Protokoll. 
Durch Senden eines XOFF-Signals 
wird das Übertragen unterbrochen, 
durch Übermitteln des XON-Signals 
wird die Übertragung fortgesetzt. Die 
international genormten ASCII-Codes 
für XON/XOFF lauten: 

XON: Control Q, DEZ 17, HEX 11 
XOFF: Control S, DEZ 19, HEX 13 
Schon haben wir unser »Problem« ge¬ 
löst. Wird der Floppy-Buffer voll, so 
schickt unser Schneider Computer ein 
XOFF. Die Gegenstelle unterbricht das 
Übertragen der Daten. Nun kann der 
Schneider Computer seinen Floppybuf- 
ferinhalt auf Diskette schreiben, ohne 
daß irgendwelche Daten verloren¬ 
gehen. 

Hat der Computer das Abspeichem der 
Daten aus dem Floppybuffer beendet, 
sendet er ein XON, die Gegenstelle 
weiß, daß sie jetzt wieder übertragen 


darf. Durch diese Methode gehen kei¬ 
ne Zeichen verloren. Die meisten Ter¬ 
minalprogramme, Datenbanken und 
Mailboxen verarbeiten dieses Übertra¬ 
gungsprotokoll korrekt. 

Perfekt ist diese Übertragungsmethode 
leider aber noch nicht, da es besonders 
bei Femübertragungen häufig in der Te¬ 
lefonleitung »knackst«. Die Übertra¬ 
gung wird gestört, es treten Fehler auf. 
Das ist ärgerlich, besonders bei Pro¬ 
grammen oder Texten, und noch viel 
mehr bei Maschinencodeprogrammen. 


XMODEM 

Ein Grund für den Amerikaner Ward 
Christensen, ein neues Übertragungs¬ 
protokoll zu schaffen, es heißt »Chri¬ 
stensen Protokoll«, oder auch »XMO¬ 
DEM«. 

Zu den Daten sendet die Gegenstelle 
eine Prüfsumme mit. Wer kennt sie 
nicht, die Checksumme, oder neuer¬ 
dings die »Checksummer« aus abge¬ 
druckten Programmen in Zeitschriften. 
Im Prinzip ist die Checksumme schon 
das ganze Geheimnis von XMODEM. 
Der Sachverhalt wieder als Beispiel: 
Sie wollen aus einer Mailbox einen 
wichtigen Text empfangen. Um Fehler 
zu vermeiden, verwenden Sie das Chri¬ 
stensen Protokoll beziehungsweise das 
XMODEM Protokoll. Die Datenüber¬ 
tragung kann beginnen. In unserem Fall 
wartet die Mailbox nun auf ein Startzei¬ 
chen, das »negativ acknowledge« 
(NAK,DEZ 21). Ist der Computer zum 
Empfangen bereit, schickt er dieses 
Zeichen, die Gegenstelle, also die 
Mailbox, weiß, daß die Übertragung 
der Daten beginnen kann. Der Sender, 
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MICROSOFT8ASIC (Dl 
C BASICCOMPILER (6) 
HIS0FT C (Dl 
NEVADA FORTRAN (Dl 
NEVADA COBOL (D) 
STARTEXTER (D) 

SIAR DATEI (Dl 
ASSEMBLER KURS IK(D) 
EASYWDRDSTAR PC 
TMS MUSIC SYSTEM (01 
LASER-BASIC (_D) 
SUPER-COF’Y (D) 
TURBO-PASCALIGral.k (D) 
TURBO PASCAL (D) 
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DATA BECKER, VORTEX, STAR DIVISION. CUMANA, GERDES, PR0FIS0FT. ARI0LA, 
RUSH-WARE MARKT & TECHNIK. SYBEX STAR, SCHNEIOER-DATA usw.l 
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SINDV\_EX/ß£Z 

Software für alle CPC’s 

Joyce u. die neuen Schneider PC’s 

Auftragsbearbeitung DM 398,- 

Finanzbuchhaltung DM 278,- 

Vereinsverwaltung DM 198,- 

Adressverwaltung DM 98,- 
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Wir führen für Sie gegen Aufpreis auf der Basis unserer 
Grundmodule jede Änderung oder Anpassung durch. 

(Auch kompl. Neuentwicklungen gegen Vorlage eines Pflichten¬ 
heftes). 


“BVTE mrcnmPUTERSV3TEmE 

Wilhelmstr. 7 • 5240 Betzdorf • Tel. (02741)23537 u. 23107 
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Bild l 

ChriStensen oder XflDDEfl Protokoll: 


Sender: 


EmpfaBngBr: 


Auf NAK warten 


NAK empfangen, as 
kann losgehen 


NAK wird gesendet... 


sendet 
SOH... 

BlonknummBr. . . 

Komplement der Blacknummer... 
128 Bytes Daten... 

PruefBumme... 


Wiederholung der Uorgaenge. 

Bei Ende der Uebertragung 
wird EDT geschickt. 


Fehlerhaft: 


ACK wird gesendet, alles korrekt, 


EOT empfangen, Ende mit ACK beataetigt, 


Falsche Daten... 


Daten nochmal senden... 


Pruefsumme stimmt nicht uebarain, 
sendet NAK . . . 


Alles klar, dann ACK... 


Dann normal weiter, wIb oben besprochen 


die Mailbox, überträgt nun noch eini¬ 
ge protokollspezifische Bytes, und an¬ 
schließend einen 128 Byte langen Da¬ 
tenblock, gefolgt von der Checksumme 
(Prüfsumme). Der Schneider Compu¬ 
ter, hier der Empfänger, vergleicht jetzt 
seine Prüfsumme mit der gesendeten. 
Stimmt diese überein, so schickt der 
Empfänger ein »acknowledge« (ACK, 
DEZ 6). Die 128 Bytes sind also fehler¬ 
los gesendet worden, es kann weiterge¬ 
hen. Sollte die Prüfsumme nicht über¬ 
einstimmen, so schickt der Computer 
ein NAK, der fehlerhafte Datenblock 
wird erneut gesendet. 

Bei neun fehlerhaften Versuchen wird 
die Übertragung automatisch abgebro¬ 
chen. Wie beim XOFF/XON Übertra¬ 
gungsprotokoll muß sowohl der Sender 
als auch der Empfänger XMODEM fä¬ 
hig sein. Mittlerweile gibt es für den 
Schneider CPC einige Terminalpro¬ 
gramme, die dieses Protokoll verarbei¬ 
ten können. 

Um Ihnen dieses etwas komplexere 
Protokoll besser zu veranschaulichen, 
studieren Sie bitte Bild 1. 

Folgende Abkürzungen und Steuerzei¬ 
chen verwendet das Christensen Über¬ 
tragungsprotokoll: 

NAK ”Negative acknowledge” HEX 15, 
DEZ 21, CTRL 0 

ACK ”Acknowledge” HEX 06, DEZ 06, 
CTRL F 

SOH ”Start of heading” HEX 01,DEZ 
01, CTRL A 

EOT ”End of transmisson” HEX 04, 
DEZ 04, CTRL D 

Der Vorteil von XMODEM dürfte nun 
wohl klar auf der Hand liegen. Das 
Übertragen von Daten erfolgt fehler¬ 


frei, es ist sogar ein Übermitteln von 
COM-Files und Binär-Programmen 
möglich. 

Selbstverständlich gibt es noch andere 
Übertragungsprotokolle, in der DFÜ, 
die jedoch nicht so stark bekannt sind, 
wie das XON/XOFF-Protokoll, oder 
das XMODEM-Übertragungsproto- 
koll. 


In dieser Folge der Serie »Mein Com¬ 
puter unterhält sich« haben Sie schon 
einige grundlegende Begriffe der DFÜ 
kennengelernt; in der nächsten Folge 
widmen wir uns noch einmal der The¬ 
orie, der V24 oder RS232 Schnittstel¬ 
le, dann geht es aber richtig los: Wir 
untersuchen eine Mailbox genauer. 

(Christian Eißner) 


Programmiersprache COMAL 

Pascal zu kompliziert? Basic zu »alt«? Logo unzureichend? 
Warum nicht gleich COMAL-80 

Diese Sprache ist strukturiert, schnell und modern. Auch Computerneulinge 
können schon nach 14 Tagen fließend programmieren. 

COMAL-80 wird in verschiedenen Bundesländern für den Schulunterricht emp¬ 
fohlen und vielfach in Universitäten eingesetzt: 

COMAL-80 Modul mit deutschem Handbuch DM248,- 

COMAL-80 Diskette mit deutschem Handbuch DM 69.— 

COMAL-80 für Joyce (CP/M) mit deutschem Handbuch DM 148,- 

Infos gegen A5-Rückumschlag 

COMAL-Vertrieb 

D. Beiz, 

2270 Utersum 
Telefon (046 83) 500 


Brandheiße Knüllerpreise 


Schneider 


Epson 


CPC 6128 mil Grünmomlor 

869- 

Drucker anschlu fertig an CPC 6126/ 


CPC 6128 mit Farbmonitor 

1499- 

PC / Atari ST und Cornm AMIGA 


Joyce PCW 8256 

1549- 

LX 86 

749,- 

Joyce Plus 

2099.- 

FX 800 

1119- 

PC mit SW-mon + 1 Laufwerk 

1849,- 

FX 1000 

1419- 

2 Laufwerken 

2249- 

LQ 800 

1549- 

PC mil SW-mon + 1 Laufwerk 


LQ 1000 

1999- 

+ 10 MB-Feslplatte 

3149- 

LQ 2500 

2879- 

dto 4 20 MB-Feslplalte 

3599.- 

EX 800 

1419- 

PC mit Farbmon v i Laufwerk 

2249- 

EX 1000 

1879.- 

+ 2 Laufwerken 

2679- 

1X800 

1679 - 

PC mit Farbmon + 1 Laufwerk 


SQ 2500 

3649- 

-t- IC MB Festplatte 

3599- 

Colorkit für EX 800/1000 

219- 

dto + 20 M5-Fes:platfe 

4049- 

Star 

NL-1G anschlußfertig 

NG-10 anschlußfertig 


Akustikkoppler Dataphon S21C 
Akustikk Dataphon S 21 1 23 

229- 

339,- 

829- 

899.- 

Disketten 


Commodore 


3" Zoll lüi CPC 6126 1 St 

12.- 

AMIGA (512 K) mil Farbmonilor 

2479,- 

lOSt 

95,- 

Sidecar für AMIGA 

1649,- 

5 1/4“ 3M 744 D-O SSDD 10 Sl 

33,- 

Commodore C 128 D 

1279,- 

100 Sl 

289- 

PC 10 II 

2899- 


Vpr5andK‘ostenoauschaie((V.»'rj»ett bis DM lOCü.-'ßa'iiber) Vorauskasse (DM 0 —120.— ), Nachnahme (DM 1t.2Qi23.20), Ausland (DM 19. -(30 -} 
Leitung nur gegen NN odr Vb'vjskassy. Ausland nur Vbrkasse Preisliste (Computarlyp argeben! gegen Zusendung eines Fieiumschlags 

CSV RIEGERT 

Sohloßhofstr. 5, 7324 Rechberghausen. Tal. (0 71 ei) 5 28 89 
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Programme—i 



Der Programmhit dieses Monats ist eigentlich ein alter Hut 
und war schon unter den Namen TRON, LIGHT CYCLE 
usw. auf vielen Computern vertreten. 

Diese Version jedoch hat in Bezug auf Geschwindigkeit, Gra¬ 
fik und Sound annähernd Spielhallenqualität und verdient den 
Titel HIT zurecht. Die Spielaufgabe: Sie steuern einen Licht¬ 
punkt über den anfangs leeren Bildschirm. Dieser Lichtpunkt 
zieht eine Linie hinter sich her. Ihr Gegenspieler (Mensch 
oder Computer), steuert einen andersfarbigen Lichtpunkt, 
der sich genauso verhält wie Ihrer. Ziel des Spiels ist es, den 
Lichtpunkt des Gegners innerhalb eines Zeitlimits in eine 
Sackgasse des Linienlabyrinths zu jagen, aus dem er nicht 
mehr herauskommt. Das ist gar nicht so einfach, da sich al¬ 
les in Pixelgröße abspielt und man schon sehr genau zielen 
muß. Nach dem Timeout oder der Aufgabe eines Spielers, 
geht es in den nächsten Level, in dem die Geschwindigkeit 
erhöht wird und sich schon beim Start Mauern auf dem Spiel¬ 
feld befinden. Sind alle Level gut überstanden, kann man sich 
in eine TOP TEN-Liste eintragen und diese abspeichem. Das 
Spiel bezieht seine hohe Geschwindigkeit aus der Tatsache, 
daß es größtenteils in MC geschrieben wurde. Das bringt al¬ 
lerdings bei unerfahrenen Programmierern immer wieder 
Schwierigkeiten mit den DATA-Ladern, wie unzählige Le¬ 
serbriefe und eine dauernd überlastete HOTLINE beweisen. 


Hier also im Klartext die Anleitung zum Abtippen des Spiels 
SNAKE: 

Das Programm besteht aus drei Listings, wir nennen sie im 
folgenden: 

SNAKE. BAS = LISTING1 
SNAKE1.LAD = LISTING2 
SNAKE2.LAD = LISTING3 

Die Namen wurden so gewählt, da die Programme auch in 
dieser Reihenfolge auf der Databox sind. 

1. Tippen Sie Listing 1 ab oder laden Sie es von der Data¬ 
box. 

2. Nehmen Sie eine Leerkassette oder formatierte Leerdis¬ 
kette und speichern Sie das Programm ab mit: 

SAVE“SNAKE.BAS 

3. Tippen Sie Listing 2 ab oder laden Sie es von der Da¬ 
tabox. 

4. Starten Sie es mit RUN. 

5. Sollte eine Fehlermeldung auftreten, so korrigieren Sie. 

6. Erscheint die Aufforderung: 

PRESS ANY KEY 

so legen Sie die Kassette/Diskette ein, auf der sich auch 
schon SNAKE befindet, drücken bei Kassette REC und 
PLAY, sowie eine Taste. 

7. Der MC Teil wird automatisch abgespeichert. 

8. Nach Erscheinen von READY, geben Sie ein: 

CALLO 

9. Tippen Sie Listing 3 ab, oder laden Sie es von der Da¬ 
tabox. 

10. Fahren Sie fort ab Schritt 4. 

11. Nach dem erneuten Erscheinen von READY haben Sie 
auf Ihrer Leerdiskette/Kassette folgende Dateien: 

SNAKE. BAS 
SNAKE.BIN 
SNAKE.DAT 

12. Das Programm kann nun durch Eingabe von: 
RUN“SNAKE.BAS gestartet werden. 

für 464-664-6128 



Listing 1 


10 SYMBOL AFTER 254 t14103 

20 SYMBOL 255,255,129,129,129,129,129,129, [21823 
255 

30 MEMORY &8FFF:CLEAR:SPEED INK 8,8 [18613 

40 ENV 1,1,0,30,4.-2,2,5,1,1,1,0,30,11,-1, C16513 
15 

50 ENV 2,1,0,10,4,-2,1,8,1,1,1,0,5,8,-1,2 C25543 

60 ENT-1,5,-1,1,5,1,1 [8901 

69 REM [2723 

70 REM ***** TITELBILD ************** [11333 

71 REM [2723 

80 MODE 1:INK 0,0:iNK 1,21:INK 2,6:!NK 3,2 [21133 
6:BORDER 0 

90 WINDOW 1,40,1,25:PAPER 3:CLS [19461 

100 WINDOW 2,39,2,24:PAPER 2:CLS [16583 

110 WINDOW 3,38,3,23:PAPER 1:CLS [17103 

120 WINDOW 4,37,4,22:PAPER 0:CLS [11501 

130 PEN 3:LOCATE 13,10:PR INT"S N A K E" [29783 

140 PEN 2:LOCATE 4,14:PR1NT CHR*(164);" 19 [29231 
86 " 

150 LOCATE 23,14:PR INT"P.PEKAREK" [19573 

160 FOR 1 = 1 TO 6:PRI NT CHR$(10):NEXT i [22753 

169 REM [2721 

170 REM ****** LOAD "SNAKE.BIN" ******* [14303 


171 REM [2721 

180 WINDOW 5,36, 14,22:a*="SNAKE.BIN":GOSUB [33141 
2540 

190 LOAD"»SNAKE.BIN" [6981 

200 FOR 1 = 1 TO 3:PR I NT CHR*(10):NEXT 1 [11561 

201 REM [2721 

210 REM ***** LOAD "SNAKE.DAT" ******* [15733 

211 REM [2721 

220 a$="SNAKE,DAT":PEN 3 [7941 


230 PRINT TAB(3)j"B1tte legen Sie die Kass [40693 
ette":PR!NT 

240 PRINT TAB(4)}"oder die Diskette mit de [39753 
r":PR I NT 

250 PRINT TAB<4);"Datei ";CHR$(34);at;CHR* [41313 
(34);" ein und":PRINT 

260 PRINT TAB<2);"druecken Sie Irgendeine [35161 
Taste.":PRINT 

270 UH I LE INKEY$<>"":WEND:WH I LE INKEY $ = ”": [36803 


UEND 

280 GOSUB 2540:GOSUB 2600 [11643 

289 REM [2723 

290 REM ***** EINGABE DATUM ********** [8333 

291 REM [2723 


300 PEN 3:CLS:PR 1 NT:PRINT TAB(3);"Bitte ge [45673 
ben Sie das heutige" 

310 PR I NT:PR I NT TAB(3);"Datum ein! TT.MM.J [40881 


I 
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J : n ;;LINE INPUT a* 

320 1F LEN<a$)>8 THEN GOTO 300 £14193 

330 datum*=a* + STRING»(8-LEN(a*) , " "> C13883 

340 GOSUB 2780 [831] 

349 REM [2723 

350 REM ***** HAUPTMENUE ************* [1570] 

351 REM [2721 

360 GOSUB 2850 [905] 

370 PEN 3:PR I NT:PR I NT TABC15);"MENUE" [I486] 

380 GOSUB 2900 [903] 

390 PRINTsPRINT"(1) START: 1 SP [2017] 

IELER" 

400 PR I NT:PR I NT"< 2) START: 2 SP [21333 

IELER" 

410 PR I NT:PR I NT"(3) HALL OF FAME" [17111 

420 PRI NT:PR 1 NT"<E) ENDE" [17673 

430 WH ILE INK£Y*<>"":WEND [1786 3 

440 a$=INKEY*:IF a*=""TH£N 440 (13763 

450 IF a*="l"THEN spie1 er = 1:GOTO 630 [20263 

460 IF a*="2"THEN spieIer=2:GOTO 630 (19483 

470 IF a*="3"THEN GOTO 2510 [14603 

480 IF a* <>"e"AND aJO"E"THEN GOTO 440 (15763 

489 REM (2723 

490 REM ***** ENDE+SAVE"SNAKE.DAT" *** (15493 

491 REM (2723 


500 WINDOW 1,40,1,2S:PAPER 3:CLS:WIND0W 2, (33903 
39,2,24:PAPER 2:CLS 

510 WINDOW 3,38,3,23:PAPER 1:CLS:WIND0W 4, [39713 
37, 4, 22:PAPER 0:CLS 

520 WINDOW 5,36,10,20:a*="SNAKE.DAT" (11433 

530 PRINT TAB(3);"Bitte legen Sie die Kass (40693 
ette":PR I NT 

540 PRINT TAB(4);"oder die Diskette fuer d £31843 
ie":PRlNT 

550 PRINT TAB(4);"Datei ";CHR*(34>;a*;CHR* (41313 
(34)ein und":PRINT 

560 PRINT TAB(2);"druecken Sie irgendeine (35163 
Taste.":PRINT 

570 WHILE 1NKEY* <>"":WEND:WH I LE 1NKEY*=”": (36803 
WEND 

580 CLS:PR I NT:PR I NT TAB(9);"Bitte warten S [36563 
ie.":PR I NT 

590 PR INT: PR 1 NT TAB (3) *,CHR* ( 34) ; "SNAKE. DAT £53433 
";CHR*<34);" wird gespeichert." 

600 GOSUB 2690:INK 1,24:INK 2,20:INK 3,6:1 (33543 
NK 0,1:BORDER 1 


610 MODE 1:PEN 1:PAPER 0:END [21363 

619 REM [2723 

620 REM ***** SPIELBEGINN ************ [19793 

621 REM £2723 

630 punktet 1)=0:punkte(2)=0:name*(2)="":na £25973 

me* (2)="" 

640 WINDOW 4,37,4,6:CLS tPRINT:PRINT TAB(13 £4554] 
);"STEUERUNG" 

650 steuer*(l)="":steuer*(2)="":notw=~l £23293 

659 REM t 272 3 

660 REM ***** ABFRAGE STEUERUNG ****** £14283 

661 REM £2723 

670 WINDOW 5,36,13,21:CLS:FOR i=i TO spiel 121003 

er 

680 PRINT"SP IELER";i [13343 

690 PR 1 NT:PRI NT"(1) TASTATUR" £12343 

700 IF NOT(spie1 er = 2 AND steuer*(1)="0">TH £61233 
EN PRINT:PR I NT"(2) JOYSTICK 0"ELSE notw=0 
710 IF NOT< spieler = 2 AND steuer*(1)="1">TH [37813 
EN PR1NT:PRINT"(3) JOYSTICK 1"ELSE notw=l 
720 WHILE INKEY*<>"":WEND C17863 

730 a*=INKEY*:IF a*=""THEN 730 £12073 

740 IF a* = "2"AND notwOO THEN steuer*(i)=" £29343 
0":GOTO 770 


750 IF a* = "3"AND notwOi THEN steuer*(i>=" £21203 
1" : GOTO 770 

760 IF a*<>"l"TH£N GOTO 730 ELSE steuertli £25523 
)="t" 

770 CLSsNEXT i £8673 

780 PRINT"SPIELER 1";:IF spieler = 2 THEN PR £50353 
INT TAB(24){"SPIELER 2"ELSE PRINT 

790 IF steuert(1)="0"THEN PR I NT : PR I NT"JOYS (83923 
TICK 0":a=0 ELSE IF steuer*(1)="1"THEN PRl 
NT:PR I NT"JOYSTI CK l":a = l 

800 IF spie Ier = 2 THEN LOCATE 23,4:IF steue £86823 
r*(2)="0"THEN PR I NT"JOYST1 CK 0":b*0 ELSE I 
F Steuer*(2)="1"THEN PR 1 NT"JOYSTlCK l”:b=l 
810 IF Steuer*(2)="t"THEN LOCATE 29,3:PRJN £30993 
T"[":PR I NT:PR I NT TAB<27);"; 3":PRJNT:PRl 


NT TAB(29);:b=2 

820 IF steuer*(i)="t"THEN IF spie!er=l THE £87943 
N PR I NT:PR I NT:PR I NT"CURSORTASTEN":a = 2 ELSE 
LOCATE 4,3:PR INT"W":PR I NT:PR I NT" A S":P 
RI NT:PR 1 NT" Z":a=3 

829 REM £2723 

830 REM ***** POKEN DER TASTATURCODES (12483 

831 REM £2723 


840 IF a=0 

THEN 

FOR 

i = 1 

TO 

4:POKE 

1 +&AQQ2, 

£27393 

J0(i):NEXT 
850 IF a=i 

1 

THEN 

FOR 

1 = 1 

TO 

4:POKE 

i+&A002, 

£37893 

jl (i):NEXT 
860 IF a=2 

i 

THEN 

FOR 

i = 1 

TO 

4:POKE 

i+&A002, 

( 16823 

c(i):NEXT I 
870 IF a=3 

THEN 

FOR 

i = 1 

TO 

4:POKE 

i+&A002, 

£37503 

t1(i):NEXT 
880 IF b=0 

i 

THEN 

FOR 

i = 1 

TO 

4:POKE 

i+&A006, 

£40673 

jO(i):NEXT 
890 IF b = 1 

i 

THEN 

FOR 

i = 1 

TO 

4:POKE 

i+&A006, 

£ 15923 

jl(i):NEXT 
900 IF b=2 

i 

THEN 

FOR 

i =1 

TO 

4:POKE 

1+&A006, 

£19293 

t2(i):NEXT i 

910 POKE LAOOO , ! 

spiel 

1 er 

MOD 

2: REM 

***** "0" 

£25153 


= 2 SpieI er,"1" = 1 Spieler 

920 PRINT:PR I NT TAB(8);"<Zwischenraumtaste £35173 
>" 

930 WHILE INKEY*<>"":WEND:WH I LE 1NKEY * < >" £40563 
":WEND 

939 REM £2723 

940 REM ***** START ****************** £9993 

941 REM £2723 

950 INK 3,13:FOR level=l TO 10:M0DE 1:PLOT £25613 

0,0,3 

960 POKE SiAOOl, 1: IF spieler = 2 THEN POKE &A £33903 
002,1 ELSE POKE &A002, I NT(RND*4)+1 
970 DRAWR 0,399:DRAWR 480,0:DRAWR 0,-399:D £24323 
RAWR-480,0 

980 ON level GOSUB 1450,1490,1540,1630,172 £29093 
0,1820,1900,1960,2080,2190 

990 FOR i = 1 TO 2:PEN i:LOCATE 33,i:PRlNT U (33783 
SING"#";i;:PR INT":"; :PR INT US ING"######";p 
unkteti):NEXT i 

1000 PEN 3:LOCATE 32,4:PR INT"Hi:";:PR I NT U £26383 
SING"######";score(l) 


1010 PEN 3:RESTORE 1030:F0R 1=6 TO 9 £15023 

1020 LOCATE 34,i:READ a*:PRlNT a*:NEXT i £31333 
1030 DATA Z,E,i,T,L,E,V,E,L £6423 

1040 FOR i=6 TO 25:L0CATE 35,i:PRINT CHR*( £32121 
143):NEXT i 

1050 FOR i=6 TO 10:L0CATE 37,i:READ at £23853 

1060 PRINT a*:NEXT i £11803 

1070 FOR i=6 TO 25:L0CATE 38,i:PRINT CHR* ( £31073 
255):NEXT i 

1080 a = 24:FOR i = l TO level :LOCATE 38,a:PRI £56863 
NT CHR*(143):LOCATE 38,a+l:PRlNT CHR*(143) 

1090 a=a-2:NEXT i £12193 

1100 LOCATE 2,2:PRINT"<Zwischenraumtaste o £40293 
d. Fire>" 

1110 WHILE INKEY*<>"":WEND: £17233 

1120 a* = I NKEY * : I F a*<>" "AND a*O n X"AND a* £26093 
<>"g"AND a*<>"G"THEN GOTO 1120 

1130 LOCATE 2,2:PR I NT SPC<28) £15923 

1140 SOUND 4,600-Ievel*50,5000,3,0,1 £12043 

1150 CALL &9000: REM ***** Start Spiel £13653 

1160 FOR k=1 TO 2000:NEXT k £18503 

1170 winner=PEEK(&A013 > £17633 

1180 IF winner=0 THEN GOTO 1300:REM ***** £37853 

Falls Remis 

1189 REM £2723 

1190 REM ***** EINDEUTIGER GEWINNER »** £8693 

1191 REM £2723 

1200 INK 1,21:1NK 2,6:WIND0W 2,28,7,11:CLS £35683 
:PR 1 NT:PEN winner 

1210 PRINT TAB(4);"GEW INNER: SPIELER";wlnn £19473 
er:WINDOW 1,40,1,25 

1220 LOCATE 8,10:PR 1NT"B0NUS:" £20143 

1230 summe=level*1000+(25-PEEK(&A016)>*500 £32513 
:LOCATE 17,10:PR!NT US ING"#####";summe 
1240 FOR k=1 TO 1000:NEXT k £17033 

1250 sehr 1tt=<summe/100):F0R j=summe TO 1 £37143 

STEP sehr 1tt* <-1) 

1260 LOCATE 17,10:PRINT US 1NG”#####”;j-sch £71713 


ritt:punkte(winner)-punkte(winner)+schritt 
: LOCATE 35', winner :PRINT US ING"######" ; punk 
te(winner) 
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»CPC-Platinen-Service« 

Ich bestelle hiermit aus Ihrem Angebot gemäß »Schneider CPC 
International», Ausgabe 7/86, Schneiderware #2: 

Stck Basisplatine, beids besch 24,90 DM 

Stck Basisplatme kompl, tunktionsfertig 62,90 DM 

Stck Centronics-Platine, eins besch 17,90 DM 

Stck Centronics-Platine kompl, tunktionsfertig 79,90 DM 

Stck Verbindungskabel zw Basisplatine und CPC 464/664 35,90 DM 

Stck Verbindungskabel zw Basisplatine und CPC 6128 45,90 DM 

Ausgabe 8/86, Schneiderware #3: 

Stck V/24 Platine beids besch 29,80 DM 

Stck V/24 Platine kompl, funktionsfertig 139,90 DM 

Ausgabe9/86, Schneiderware #4: 

Stck Netzteil-Platine, eins besch 17,90 DM 

Stck Netzteil-Platine, kompl 119,90 DM 

Stck Netztrafo 79,90 DM 

Stck Netzteil, Netztrafo 184,90 DM 

Ausgabe 10/86, Schneiderware #5: 

Stck Echtzeituhr-Platine, beids , besch 29,80 DM 

Stck Echtzeituhr, kompl, funktionsfertig 99,90 DM 

Ausgabe 12/86, Schneiderware #6: 

Stck PlO-Platine, beids besch 29,80 DM 

Stck PIO, kompl funkt-fert 198,90 DM 

Ausgabe 1/87, MIDI-Interface 

Stck MIDI-Interface- und Timer-Platinen 39,90 DM 

Stck MIDI-Interface- und Timer-Platinen, kompl bestückt 69,— 

Betrag__ 


+ Porto/Verpackung (Inland 5 - DM / Ausland a- DM) 

Gesamtbetrag 


DM 

DM 


□ Diesen Betrag bezahle ich mittels des beigefügten Verrechnungsschecks 

□ Ich bitte um Lieferung per Nachnahme (nur innerhalb der BRD) 

Bei Nachnahme kommt zum o g Betrag noch die Nachnahmegebühr hinzu 
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Programm—i 


1270 NEXT j:FOR k=l TO 2000:NEXT k [18793 

1280 GOTO 1400 [387] 

1289 REM [272 3 

1290 REM ***** REMIS. ***************** [13333 

1291 REM C 272 3 

1300 INK 1,21: INK 2,6:W!ND0W 2,28,7, 11:CLS [23723 
:PR INT 

1310 PRINT TAB <13);"REM IS.":W!NDOW 1,40,1, [3264] 
25:FOR k=l TO 1000:NEXT k 

1320 LOCATE 3,10:PRINT"BONUS:" [18623 

1330 FOR i=1 TO 2:PEN i:LOCATE 10,10:PRINT [4173] 
"SP I ELER" ; i LOCATE 22.10-.PRINT level*l 

00 

1340 FOR k=1 TO 1000:NEXT k [17033 


1350 FOR j = 1eve l * 100 TO 1 STEP !eve!*<-l> [16053 

1360 LOCATE 22,10:PR!NT j- 1 eve I: punkte ( i )= [4291 3 
punkte(i)tlevel :LOCATE 35,i:PRINT USING"## 

####";punkte(i) 

1370 NEXT j:FOR k=l TO 1000:NEXT k:NEXT i [2794] 
1380 FOR k=1 TO 2000:NEXT k [1850] 

1390 leve1=level-1 [10003 

1400 NEXT level:GOTO 2380:REM ***** Naechs C37143 
tes Level,sonst Ende 

1409 REM [2723 

1410 REM ***** ln den 2ei!en 1450-2290 wer [2326] 
den 

1420 REM ***** jeweils die Geschwindigkeit [24873 

1430 REM ***** die Zeit und die Anfangspos C26153 
3 tionen 

1440 REM ***** gepokt,sowie das Spielfeld C31423 


gezeichnet. 

1441 REM [2723 

1450 POKE kAOl5,73:POKE &A017.139 [11953 

1460 x1=220:y1 = 200:x 2-260:y2 = 200 [ 1649] 

1470 GOSUB 2310 [8613 

1480 RETURN [5553 

1490 PCKE &A015,78:PÜK.E &A017.112 [20053 

1500 xl=200:yl=200:x2=280:y2=200 [22333 

1510 PLOT 240, 100,3:DRAW 240,300 [14223 

1520 GOSUB 2310 [8613 

1530 RETURN [5553 

1540 POKE &A01 5,85: POKE &<A017,85 [13783 

1550 xl=200:yl=200:x2=280:y2=200 C22333 


1560 PLOT 40,40,3:DRAUR 0,40:PL0T 0,40:DRA C24713 
WR 80,0 

1570 PLOT 440,320:DRAWR 0,40:PL0T 480,360: E22063 
DRAWR-80,0 

1580 PLOT 40.360:DRAWR 0,-40:PL0T 0,360:DR [15063 
AWR 80,0 

1590 PLOT 440,40:DRAWR 0,40:PL0T 480,40:DR [26983 
AUR-80,0 

1600 PLOT 160,80:DRAW 160,320:PL0T 320,80: [27363 


DRAU 320,320 

1610 GOSUB 2310 [8613 

1620 RETURN [5553 

1630 POKE ScAOl5,95 : POKE &A017.74 [13473 

1640 xl=160:yl=200:x2=320:y2=200 [19133 


1650 PLOT 40,40,3:DRAWR 0,40:DRAWR 40,0:DR [32583 
AWR 0,-40:DRAWR-80,0 

1660 PLOT 440,40:DRAWR 0,40:DRAWR-40,O:DRA [20553 
WR 0,-40:DRAWR 80,0 

1670 PLOT 40,360:DRAUR 0,-40:DRAWR 40,0:DR [20163 
AWR 0,40:DRAWR-80,0 

1680 PLOT 440,360:DRAWR 0,-40:DRAWR-40,0:D [26743 
RAWR 0,40:DRAWR 80,0 

1690 PLOT 220, 180:DRAWR 0,40:DRAWR 40,0:DR [37863 


AWR 0,-40:DRAWR-40,0 

1700 GOSUB 2310 [8613 

1710 RETURN [5553 

1720 POKE &A015,92:POKE &A017,63 [14093 

1730 x1 = 160:y1=200:x2 = 320t y2 = 200 [19133 


1740 PLOT 0,40,3:DRAWR 40,0:DRAWR 0,80:DRA [15113 
WR-40,0 

1750 PLOT 0,360:DRAWR 40,0:DRAWR 0,-80:DRA [17633 
WR-40,0 

1760 PLOT 480,40:DRAWR-40,0:DRAWR 0,80:DRA [13023 
WR 40,0 

1770 PLOT 480,360:DRAWR-40,0:DRAWR 0,-80:D [28463 
RAWR 40,0 

1780 PLOT 180,80:DRAW 300,80:PL0T 180,320: [21073 
DRAW 300,320 

1790 PLÜT 80,120:DRAW 80,280:PL0T 400,120: [20233 
DRAU 400,280 

1800 GOSUB 2310 [8613 


ES GIBT VIELE 

COMPUTERZEITSCHRIFTEN... 

DAS KONZEPT VON 
PASCAL IST ANDERS! 



CAL 

HUimiioiii 

4 $ 


PROLOG 


Das Leben und werk 
von Blaise Pascal 

- dn Genius au* Abfragen? 


PASCAL, DAS COMPUTERMAGAZIN 
FÜR HOCHSPRACHEN BRINGT FÜR ALLE 
COMPUTER: 

Reportagen und Interviews 
Praxishilfen, Programme, Tools, 
Anwendungsbeispiele 
Programmierwerkzeuge: Ausführliche 
Vorstellung, Reviews, 
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Wissenschaft und Technik 
Hardware, Anwendungssoftware: 
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f— Programm 






1810 RETURN 

C 555 ] 

THEN PEN 1:PRINT"1.SPIELER ";punkte(1):PR 


1820 POKE &A015,87: POKE &A017.52 

C 891 ] 

INT:PEN 2:PR INT”2.COMPUTER punkte(2):GOT 


1830 x1=160:y1=200:x2=320:y2=200 

£19133 

0 2430 


1840 PLOT 200,40,3:DRAW 40,40:DRAW 40,160 

C20043 

2400 IF sple1er=1 THEN PEN 2:PR I NT"1.COMPU 

[53393 

1850 PLOT 200,360:DRAW 40,360:DRAW 40,240 

t13953 

TER ";punkte(2>:PR I NT:PEN 1:PR 1NT"2.SP IELE 


1860 PLOT 280,40:DRAU 440,40:DRAW 440,160 

[20163 

R ";punkteC1):GOTO 2430 


1870 PLOT 280,360:DRAW 440,360:DRAW 440,24 

0 

C17523 

2410 IF punkte(1)>punkte(2)THEN PEN 1:PRIN 
T"l.SPIELER 1 ";punkte(1):PRINT:PEN 2:PRIN 

[80883 

1880 GOSUB 2310 

[8613 

T"2.SPIELER 2 punkte(2):GOTO 2430 


1890 RETURN 

[5553 

2420 PEN 2:PRINT"1.SPIELER 2 punkte(2):P 

C50353 

1900 POKE &A015,104:P0KE &A017,41 

C14343 

RI NT:PEN 1:PR 1NT"2.SP IELER 1 ";punkte<l) 


1910 x1=80:y1=200:x2=4QG:y2=200 

[14493 

2430 PEN 3:PRI NT:PR I NT:PR I NT:PR I NT TAB(8); 

[43013 

1920 PLOT 40,80,3:DRAU 40,320:PL0T 440,60: 

[21533 

"<Zwlsehenräumtaste>" 


DRAU 440,320 


2440 WHILE I NKEY«< > " " : WEND: WH I LE INKEYiO" 

[40563 

1930 PLOT 200,200:DRAW 280,200:PLOT 240,80 

[23943 

":WEND 


:DRAW 240,320 


2449 REM 

[272 3 

1940 GOSUB 2310 

[8613 

2450 REM ***** EVENTUELL NEUER REKORD * 

[12763 

1950 RETURN 

[5553 

2451 REM 

[272 3 

1960 POKE &A015,101:PQKE &A017.30 

[12043 

2460 PEN 3:IF punkte(1)>score(10)THEN GOSU 

[45773 

1970 x1=120:y1=200:x2=360:y2=200 

[12053 

B 2850:PR I NT:PR INT TAB(5 );"NEUER REKORD VO 


1980 PLOT 40,0,3:DRAWR 0,40:DRAWR-40,0 

[25973 

N SPIELER 1" : GOSUB 2900:s=1:GOSUB 2940 


1990 PLOT 440,0:DRAWR 0,40:DRAWR 40,0 

[17243 

2470 IF sple1 er = 1 THEN punkte(2)=0 

[25703 

2000 PLOT 40,400:DRAWR 0,-40:DRAWR-40,0 

[12453 

2480 PEN 3:IF punkte(2)>score<10)THEN GOSU 

[80533 

2010 PLOT 440,400:DRAWR 0,-40:DRAWR 40,0 

[21763 

B 2850:PR INT:PR INT TAB<5);"NEUER REKORD VO 


2020 PLOT 240,40:DRAW 240,120:DRAW 200,120 

[32803 

N SPIELER 2":GOSUB 2900:a=2:GOSUB 2940 


:DRAW 280,120 


2490 GOTO 360:REM ***** MENUE 

[15303 

2030 PLOT 240,360:DRAW 240,280:DRAW 200,28 

(23973 

2499 REM 

C272 3 

0:DRAW 280,280 


2500 REM ***** ANZEIGE DER TOP-TEN **** 

C22043 

2040 PLOT 160,200:DRAW 320,200 

[13283 

2501 REM 

[272 3 

2050 GOSUB 2310 

[8613 

2510 GOSUB 3080 

C11363 

2060 LOCATE 3.24:PRINT SPC(28) 

[16263 

2520 FOR k=1 TO 5000:NEXT k:GOTO 360 

[21783 

2070 RETURN 

[555 3 

2529 REM 

[272 3 

2080 POKE &-A015, 101: POKE &A017.30 

[1204 3 

2530 REM ***** LADE-ROUTINE (TEXT) **** 

[18123 

2090 x1=120:yl=200:x2=360:y2=200 

[12053 

2531 REM 

[2723 

2100 PLOT 120,40,3:DRAW 40,40:DRAW 40,280: 
PLOT 0,320 

[30543 

2540 PEN 3:PR I NT TAB(8);"Bitte warten Sie. 
”:PR INT:PR INT 

t 3123 3 

2110. DRAW 80,400 : PLOT 360,360:DRAW 440,360 

C 2424 3 

2550 PEN 1:PRINT”Programmteil":PRINT 

[25003 

:DRAW 440,120 


2560 PRINT TAB(11);CHR$(34); a«;CHR«(34):PR 

117113 

2120 PLOT 400,0:DRAW 480,80:PLOT 200,160:D 

[27523 

INT 


RAWR 80,0 


2570 PRINT TAB(20);"wird geladen." 

[ 11773 

2130 DRAWR 0,80:DRAWR-80,0:DRAWR 0,-80 

[16793 

2580 RETURN 

[5553 

2140 PLOT 160,40:DRAWR 160,0:PLOT 160,80:D 

[34343 

2589 REM 

[272 3 

RAWR 160,0 


2590 REM ***** LOAD "SNAKE.DAT" ******* 

[15733 

2150 PLOT 160,360:DRAWR 160,0:PLOT 160.320 

[22043 

2591 REM 

[272 3 

:DRAWR 160,0 


2600 OPEN!N"!SNAKE.DAT" 

£809 3 

2160 GOSUB 2310 

[861 3 

2610 FOR i=1 TO 10 

[3153 

2170 LOCATE 3,24:PR1NT SPC(28) 

£16263 

2620 1NPUT#9,score(1) 

£15333 

2180 RETURN 

£5553 

2630 LINE INPUT#9,n«(i) 

[17933 

2190 POKE &A015,101:POKE &A017.30 

[12043 

2640 LINE INPUTI9,datum«(i) 

[15383 

2200 x1=160:y1=200:x2=320:y2=200 

[19133 

2650 NEXT 1 

L 3 /'S J 

2210 PLOT 80,40,3:DRAWR 320,0:PLOT 80,360: 

[25713 

2660 CLOSEIN 

[752 3 

DRAWR 320,0 


2670 RETURN 

£555 3 

2220 PLOT 120,80:DRAWR 24O,0:PL0T 120,320: 

[25433 

2679 REM 

[2723 

DRAWR 240,0 


2680 REM ***** SAVE "SNAKE.DAT" ******* 

[ 15423 

2230 PLOT 160,120:DRAWR 160,0:PLOT 160,280 

C32903 

2681 REM 

£2723 

:DRAWR 160,0 


2690 OPENOUT"!SNAKE.DAT" 

[1375 3 

2240 PLOT 200,160:DRAUR 80,0:PLQT 200,240: 

[15943 

2700 FOR i=1 TO 10 

[3153 

DRAWR 80,0 


2710 PRINT#9,score<I) 

C 20913 

2250 PLOT 40,80:DRAWR 0,240:PLOT 440,80:DR 

[22503 

2720 PR 1NT#9,n«(i) 

[820 3 

AWR 0,240 


2730 PR1NT#9,datum«(i) 

£13893 

2260 PLOT 80,120:DRAWR 0,160:PLOT 400,120: 

[21673 

2740 NEXT i 

£375 3 

DRAWR 0,160 


2750 CLOSEOUT 

[9023 

2270 PLOT 120,160:DRAUR 0,80:PLOT 360,160: 

[26193 

2760 RETURN 

[ 555 3 

DRAWR 0,80 


2769 REM 

[272 3 

2280 GOSUB 2310 

[8613 

2770 REM ***** INITIALISIERUNG ******** 

[17333 

2290 RETURN 

£555 3 

2771 REM 

[272 3 

2299 REM 

£2723 

2780 a=72:FOR i=l TO 4:jO(i)=a:a=a+1:NEXT 

[17843 

2300 REM ***** POKEN DER ANFANGSPOSITION 

[23203 

i 

£25243 

2301 REM 

[2723 

2790 a =48:FOR 1 = 1 TO 4:Jl(i)=a:a=a + i:NEXT 

2310 POKE &AOOB, < x 1 MOD 256):P0KE i.AOOC.IN 

[21283 

1 

[15673 

T(xl/256) 


2800 c(l)=0:c(2)=2:c(3)=8:c(4)=l 

2320 POKE &AOOD, (yl MOD 256>:P0KE &A00E.IN 

[31883 

2810 tl(l)=59:tl(2)=71:tl(3)=69:tl(4)=60 

[18083 

T(yl/256) 


2820 t2(1)=17:t2(2)=22:t2(3)=28:t2(4)=19 

[12683 

2330 POKE kAOOF,(x2 MOD 256):P0KE &A010.IN 

130773 

2830 RETURN 

[5553 

T< X2/256) 


2839 REM 

£2723 

2340 POKE 8.A011,<y2 MOD 256):P0KE &A012.IN 

[2721) 

2840 REM ***** KLEINE UMRANDUNG ******* 

[15543 

T(y2/256> 


2841 REM 

[272 3 

2350 PLOT x1,yl,1:PLOT x2,y2,2 

[9673 

2850 INK 3,26:WINDOW 1,40,1,25:CLG 3:CLG 2 

[23093 

2360 RETURN 

[5553 

:CLG 1:CLG 0 

[32283 

2369 REM 

C 272 3 

2860 WINDOW 1,40,1,25:PAPER 3:CLS:WIND0W 2 

2370 REM ***** ENDE + ENDERGEBNIS ***** 

C18403 

,39,2,8:PAPER 2:CLS 

[40463 

2371 REM 

£2723 

2870 WINDOW 3,38,3,7:PAPER 1:CLS:WIND0W 4, 

2380 GOSUB 2850:PEN 3::PR I NT:PR I NT TAB(12) 

[63133 

37,4,6:PAPER 0:CLS 

[5553 

;"ENDERGEBNIS":GOSUB 2900:PR INT 


2880 RETURN 

2390 IF punkte(1)>=punkte(2)AND spleler=l 

[93253 

2889 REM 

£272 3 


136 PC 2’87 










VERSAND 


R V I C E 


vortex Computersysteme GmbH • Falterstraße 51-53 • 7101 Flein 


Telefonische Bestellung 



Tel. 0 71 31/5 20 65 


JOYCE-HARDWARE: 


RAM-Erweiterung für Joyce PCW 8256: 
Speichererweiterung von 256 KB (die Kapazität der RAM- 
Disk wird unter CP/M auf 368 KB mehr als verdreifacht!) 
8 x 256 Kbit-Original-Bausteine wie im Gerät Mit ausführli¬ 
cher Einbauanleitung Preis: 109,— DM 

FD-2 (2 Laufwerkfür Joyce PCW 8256): 

Kapazität 2x80 Spuren mit insgesamt 1MB unformatiert 
(706 KB formatiert). Zwei Schreib-Lese-Köpfe. Komplett mit 
ausführlicher Einbauanleitung in transportsicherer Styro¬ 
por-Verpackung Preis: 579,— DM 

Schnittstellen-Interlace: 

Mit diesem Interface haben Sie endlich eine 8-Bit Centro¬ 
nics- und eine serielle RS-232-Schnittstelle CPS 8256 
Schnittstelle Seriell/Parallel, Preis: 139,— DM 

Bildschinmfilter für Joyce-Monitor Reduziert Flimmern 
und störende Spiegelungen Preis: 79,— DM 

Farbband für Joyce-Drucker. Preis: 24.80 DM 

Joyce-Drucker Verlängerungskabel: 

Inklusive Stromverlängerungskabel 59,— DM 

Papierführung Joyce: Ersetzt die vorhandene „Klappe“ 
Durch den verstellbaren Seiten-Anschlag ist ein gerader 
Papiereinzug und genaue seitliche Einstellung vom Druck- 
Anfang möglich Preis: 37,— DM 

Disketten: 

5 Stück CF-2 DD (für Megabyte-Laufwerk) 99,— DM 

DFÜ (Datenfernübertragung): KSHBK3H 

VORTEX-VAK-300: 

Übertragungsgeschwindigkeit: 300 Baud 
Orginate-/Answermodus 

Stromversorgung: 9 V Blockbatterie/externes Netzteil 
Preis: 198,—DM 

VORTEX-Phono-Set - bestehend aus: 
AkkustikkopplerVORTEX-VAK-300, Schnittstelle VORTEX- 
RS-232, Netzteil zur Stromversorgung, Diskettensoftware 
und Verbindungskabel Ihr Vorteil: Alles aus einer Hand, 
d h. keine Kompatibilitätsprobleme Nurauspackenundan- 
schließen und „datenfernübertragen''. 

SONDERPREIS: 498,— DM 

Multi-Link-Kabel: 

Durch DIP-Schalter programmierbares RS-232 Kabel. Löst 
95% aller möglichen Verbindungen Kabellänge: 2 Meter 
Stecker/Stecker Preis: 69.90 DM 

VERBINDUNGSKABEL: BB^EBSaa 

Druckerkabel: 

für CPC 464,664 (2 m Länge Flachbandkabel) 44,— DM 
für CPC 6128 (2 m Länge Flachbandkabel) 44,— DM 

für CPC 6128 (1,5 m Länge Rundkabel) 49,— DM 

Akkustikkopplerkabel (zw RS232 u Modem) 1,5m 49,50 DM 
Anschlußkabel: 2 Floppy an CPC 664 44,50 DM 

Anschlußkabel: 2 Floppy an CPC 6128 44,50 DM 

Monitorverlängerung für CPC 464 22,90 DM 

Monitorverlängerung für CPC 664 u. 6128 28,90 DM 

Joystickverlängerung für 1 Joystick (2 m Länge) 14,90 DM 
Recorderanschluß (CPC an 5-pol. DIN Buchse) 17,90 DM 
Recorderanschluß (CPC an Klinkenbuchse) 17,90 DM 

CPC-Stereokabel zum Anschluß an HiFi-Anlage 15,90 DM 


DISKETTEN: 

5'/4'' VORTEX-DISK DS/DD 96 tpi 10 Stk 59,—DM 

3 Vf VORTEX-DISK DS/DD 135 tpi 10 Stk 69,— DM 

3" DISK CF-2 5 Stk/10 Stk 49,90/89,—DM 

3" DISK CF-2 DD (Joyce 8512) 5 Stk 99,— DM 

DRUCKER: 

Typenraddrucker VORTEX-2000 998,— DM 

Panasonic KX-P1080 (siehe Datenblatt) 598,— DM 

Panasonic KX-P 1092 NLQ (siehe Datenblatt) 998,— DM 

Microline ML 182 (mit Centr.-Schnittstelle) 898,— DM 

Okimate 20 (Farbdrucker) 698,— DM 



SUPERPREIS - SUPERPREIS - SUPERPREIS 


OKI DATA Microline ML 192 Plus 

mit Einzelblatteinzug 1 499,— DM 

Auch (ür andere OKIDATA-Drucker haben wir für Sie 
Sonderpakete zusammengestellt Rufen Sie uns an Es 
lohnt sich Abgabe nur solange Vorrat reicht!!! 

Centronics GLP (baugleich Schneider NLQ 401) mit 
Near-Letter-Quality Unser Weihnachtspreis: 399,— DM 
ACHTUNG:Bei Bestellungenbis31 12 86wirddieTrak- 
torlührung kostenlos mitgeliefert 



DRUCKERZUBEH Ö R: EHHBBi 

Druckerständer: 

Papierzuführung wahlweise von unten oder hinten, sehr 
stabile Ausführung, Nutzfläche: 40 x 32 cm Preis: 55,— DM 

Traktorführung: 

Zur problemlosen Verarbeitung von Endlos-EDV-Papier 
Für Schneider NLQ 401: 69,90 DM 

Für Okidata ML 182/192: 79,— DM 


PFLEGEMITTEL: 

ORIGINAL VORTEX-ABDECKHAUBEN: 

Schützen Sie nicht nur Ihre Schneider-, sondern auch Ihre 


VORTEX-Hardware vor Verschmutzung: 

Schneider Floppy DDI-1 16,80 DM 

VORTEX Floppy FI-So.FI-D 19,80 DM 

Schneider Konsole für 464 u 664 19,80 DM 

Schneider Konsole für 6128 19,80 DM 

VORTEX Floppy Fl-Xu M1-X 19,80 DM 

Schneider Monitor grün 24,80 DM 

Schneider Monitor color 26,80 DM 

Schneider NLQ 401 19,80 DM 

Sch neider DMP 2000 22,80 DM 

VORTEX Winchesterlaufwerk WD-20 19,80 DM 

Reinigen Sie Ihr SW' Laufwerk mit unserem speziellen Rei¬ 
nigungsset: 5 W' Kopfreinigungsdiskette: 24,95 DM 


Azimuth; Ein Programm zur genauen Einstellung Ihres Kas¬ 
settenrecorders am CPC 464 Kein Read Error mehr durch 
einen verstellten Tonkopf Mit Schraubenzieher und einem 
Testspiel Preis: 39,90 DM 


NEU NEU NEU NEU NEU NEU NEU NEU NEU NEU 
SOFTWARE ■ SOFTWARE SOFTWARE SOFTWARE 


SPIELE: 


PAPERBOY 

C/D 

36,—/S4.— 

DM 

1942 

C/D 

36,~/54.— 

DM 

LIGHT FORCE 

C/D 

29,90/39,90 

DM 

BOMB JACK 

C/D 

31,—/42.90 

DM 

GHOSTN GOBLINS 

C/D 

29,90/39,90 

DM 

LEADER BOARD 

C/D 

39,~/49.~ 

DM 

BAT MAN 

C/D 

29,90/42,90 

DM 

EQUINOX 

C/D 

33,90/45,— 

DM 

KNIGHT GAMES 

C/D 

34,90/49,90 

DM 

HEXENKÜCHE TEIL II 

C/D 

29,-/42,90 

DM 

IMPOSSIBLE MISSION 

C/D 

39,—/49,— 

DM 

SHOGUN 

C/D 

34,90/46,90 

DM 

MISSION ELEVATOR 

C/D 

35,90/59,— 

DM 

GOONIES 

C/D 

39.—/59,— 

DM 

REBEL PLANET 

C/D 

36,90/59,— 

DM 

QUESTPROBE 

C/D 

36,90/59,— 

DM 

INTERNATIONAL KARATE 

C/D 

29,90/39,90 

DM 

STREET HAWK 

C/D 

34,90/59,— 

DM 

EDEN BLUES (DOOMSDAY BLUES) 

C/D 

19.90/44,90 

DM 

CRAFTON 8 XUNK (GET DEXTER) 

C/D 

19,90/44,90 

DM 

MELTDOWN 

C/D 

27,90/34,90 

DM 

WANTED GUNFRIGHT 

C/D 

39.—/59,~ 

DM 

JACK THE NIPPER 

C/D 

31,90/48,90 

DM 

GLADIATOR 

C/D 

39,90/54.90 

DM 

MANDRAGORE 

C/D 

39,90/49,90 

DM 

NEXUS 

C/D 

35,90/48,90 

DM 

NIGHT GUNNER 

C/D 

29,-/46,90 

DM 

PACIFIC 

C/D 

33,90/46,90 

DM 

RESCUE ON FRACTALUS 

C/D 

35,90/48,90 

DM 

DAN DARE 

C/D 

32,90/42,90 

DM 

GLASS 

C/D 

19,90/34,90 

DM 

NUCLEAR DEFENCE 

C/D 

29,90/39,90 

DM 

DOOMSDARK REVENGE 

C 

32,90 

DM 

QUESTOR 

D 

42,90 

DM 

ACTIVATOR 

D 

42,90 

DM 

TEMPEST 

C/D 

36,--/48,— 

DM 

GALVAN 

C 

32,90 

DM 

DRWHO 

C/D 

32,90/44,90 

DM 

TRAP DOOR 

C 

29,90 

DM 

BOBBY BEARING 

C/D 

32,90/48,— 

DM 

GLIDER RIDER 

C 

29,90 

DM 

DRUID 

C 

27,— 

DM 

TYJAD 

D 

47,90 

DM 

FROST BYTE 

C 

29,90 

DM 


ANWENDUNGEN: 

Bei Bestellung bitte Rechnertyp und Diskettenformat ange¬ 
ben: 

ACB (Arcade Construction Set): 

siehe Test CPC 9/86 für CPC 464 (Cas): 44,90 DM 

d'Base II, Wordstar, Muitiplan je 198,— DM 

Turbo Pascal 3 0 219,— DM 

Turbo Pascal 3 0 (m Graphikunterstützung) 279,— DM 
Turbo-Lader-Grundpaket 125,— DM 

Turbo-Lader Business 148,— DM 

Turbo-Lader Sience 189,— DM 


Seibstverständncli erfiälfen Sie über den VORTEX-Versand-Service auch alle VORTEX-Produkte 


NÜTZLICHES ZUBEHÖR: 

VORTEX-Monitorständer: Dreh- und schwenkbar in allen 
Richtungen. Für alle 12" Monitore Solide Ausführung aus 
bruchfestem Kunststoff Preis: 39,90 DM 

Monitorentspiegelungsspray: Beseitigen Sie lästige Re¬ 
flexionen sofort und dauerhaft. Die Augen werden spürbar 
entlastet Auch für andere Anwendungen geeignet wie z B : 
Bilderglas, Autoarmaturen, Fernsehgeräte und ähnliche 
optische Anwendungen Siehe Sonderprospekt 
Preis: 29,90 DM 

Bildschirmfilter: Vorsatz-Filter, reduziert störende Spiege¬ 
lungen und Flimmern, wird mit einem Klebeband-Klettver¬ 
schluß am Gehäuse befestigt Filter aus Gewebe auf Kunst¬ 
stoffrahmen 

Für Farbmonitor CTM 640/644: 79,— DM 

Für Grünmonitor GT 64/65 (bis 12/85) 59,— DM 

Datenrecorder: Zum Laden und Speichern von Kassetten¬ 
software auf dem CPC664 und CPC 6128 Im Preis ist das Da- 
tenübertragungs- und das Netzkabel enthalten Auch für 
Batteriebetrieb geeignet und als normaler Musikrecorder 
verwendbar Preis 89,— DM 


O Senden Sie mir Ihren Katalog (SchutzgebQhrDM 3,-, bei Bestellung ab DM 100,- frei) 
O Senden Sie mir umgehend folgende Artikel aus Ihrem Angebot: 

O per Nachnahme O per Euro-Scheck 


bei Aufträgen bis DM 200,- Versandkostenpauschale DM 5,90_ 

Absender: Gesamtsumme 


DM 

DM 

DM 

DM 

DM 

DM 


Telefon-Nr._ Unterschrift_ 

Alle Lieferungen erfolgen auf Grund unserer Allgemeinen Geschäftsbedingungen 













































[—Programm 


2890 REM ***** GROSSE UMRANDUNG ******* 

2891 REM 

C18213 

C 272 3 

1 

130 

DATA 

AO, 1B, 1B, ED, 53, OB, AO, E5, D5, CD, 8<54 

C2042) 

2900 WINDOW 2,39,1Q,24:PAPER 2:CLS:WIND0W 

3,38,11,23:PAPER 1:CLS 

t41873 

8 

140 

DATA 

FO, BB, FE,00,C2,CB,91,Dl,El,CD,&74 

£2606) 

2910 WINDOW 4,37,12,22:PAPER 0:CLS:PEN 3:W 
INDOW 5,36,13,21 

[24733 

6 

150 

DATA 

11,93,C3,20,91,ED,SB,OB,AO,2A,&43 

[2191) 

2920 RETURN 

2929 REM 

[5553 
[272 3 

5 

160 

DATA 

OD, AO, 13, 13, ED,53,OB,AO,E5,D5,&47 

C2386) 

2930 REM ***** NEUER REKORD *********** 

2931 REM 

[16363 
[272 3 

8 

170 

DATA 

CD,FO,BB,FE,00,C2,CB,91,Dl.El,&74 

t1571] 

2940 a$="":name$(a)="":PEN a:PR!NT:PR INT"S 

P1ELER":a:PR I NT 

C30S03 

6 

180 

DATA 

CD, 11,93, C3,20,91, ED, 5B, OF, AO, 8.4D 

[2026) 

2950 PRINT"Bitte gehen Sie Ihren Namen ein 

t it 

C33023 

C 

190 

DATA 

2A, 11, AO, 23, 23,22, 11 , AO, E5 , DS, &<3A 

£1898) 

2960 LOCATE 5,8:PR1NT STR ING*(12,CHR*(208) 

) 

[16183 

E 

200 

DATA 

CD,FO,BB,FE,00,C2,E2,91,Dl,El,&75 

C1940) 

2970 FOR 1=10000 TO 0 STEP-10 

2980 LOCATE 22,8:PR INT"ZE1T:"j 1 NT(1/100) 

£12853 

C24173 

D 

210 

DATA 

CD.IE,93,C3,35,91,ED,5B,OF,AO,&4F 

[919) 

2990 a$ =1NKEY$: 1F a*<CHR$C32)AND at<>CHR*( 

13)THEN GOTO 3030 

[21053 

E 

220 

DATA 

2A,11,A0,2B,2B,22,11,AO,E5,D5,&3B 

[2316] 

3000 1F a$=CHR*(13)THEN 1=0:G0T0 3030 

3010 IF a*=CHR*(127)THEN IF LEN(namet<a))> 

[5953 

[99653 

E 

230 

DATA 

CD,FO.BB,FE,00,C2,E2,91,Dl,El, &75 

[1940) 

0 THEN name* (a ) =LEFT J(nauieKa), LEN < name*(a 
))-1):LOCATE 5,7:PRINT STR ING$<12," "):GOT 


D 

240 

DATA 

CD, IE,93,C3,35,91,ED,5B,OF,AO, &4F 

£919) 

0 3030 ELSE GOTO 3030 

3020 IF LEN(namet(a))< 1 2 THEN name*(a)=nam 

[28013 

E 

250 

DATA 

2A, 11 , AO, 1B,1B,ED,53,OF,AO,E5.&3E 

[2228] 

e$(a)+UPPER*(a*) 

3030 LOCATE 5,7:PR 1 NT name*(a>:NEXT i 

[17113 

5 

260 

DATA 

D5, CD, FO, BB, FE, 00, C2, E2, 91, Dl, &7S 

[1251] 

3040 namet(a)=name*(a) +STR!NG*(<12-LEN<nam 
e * (a) ) ) , " " ) 

[45083 

1 

270 

DATA 

El,CD,IE,93,C3,35,91,ED,5B,OF, &53 

[1549] 

3050 n*(10)=name* <a):score(10)=punkte(a):d 
atumt(10)=datum* 

C39393 

F 

280 

DATA 

A0.2A, 11, AO, 13, 13, ED, 53, OF, A0.8-39 

[1596] 

3060 GOSUB 3080:RETURN 

3069 REM 

[13033 
[2723 

0 

290 

DATA 

E5, D5, CD, FO, BB, FE,00,C2,E2,91,&76 

[1510] 

3070 REM ***** TOP-TEN SORT+AUSGABE *** 

3071 REM 

[13023 

[2723 

5 

300 

DATA 

Dl,El,CD,IE,93,C3,35,91,3A,17,&50 

[2384) 

3080 FOR 1=1 TO 9 

3090 ste11e=i 

[4613 

[7013 

A 

310 

DATA 

AO, 47, CD, IE, BB, 10, FB , 3A, 01 , AO, 8<47 

(2354) 

3100 FOR 3=1+1 TO 10 

3110 IF scoreCstel1e)<score(j)THEN stelle= 

[11653 

[20893 

3 

320 

D 

330 

DATA 

FE, 01, CA, OE, 90,FE,02,CA,2C,90,&4E 

[920) 

3120 NEXT j 

[370 3 

DATA 

FE, 03, CA, 4A, 90, C3,69,90,3A , 02, &49 

[1116) 

3130 score(0) = score(i) :score(i)=score(ste! 
le):score(ste)le)=score(0) 

C37263 

D 

340 

DATA 

AO,FE,01,CA.88,90,FE,02,CA,A6,&5F 

[1640) 

3140 n*(0)=n*( i ):nt(l)=n$(stelle):n* < ste1t 
e)= n*(0) 

3150 datum*(0)=datum*(i):datum*(i)=datum*( 

£21623 

[57523 

1 

350 

DATA 

90,FE,03,CA,C4,90,C3,E3,90,3A,&61 

[1373) 

stel le):datum*(stelle)=datum*(0) 

3160 NEXT 1 

[375 3 

360 

DATA 

03, AO, CD, IE, BB,C2,91,92,3A,04,&46 

[2625) 

3170 GOSUB 2850:PEN 3 

3180 PR I NT:PR I NT TAB(5);"SNAKE - HALL OF F 

[18413 
[27333 

C 

370 

DATA 

AO, CD, IE, BB, C2, Al, 92,3A, 05, AO, 8.51 

[2314) 

AME" 

3190 GOSUB 2900:WINDOW 5,36,13,22 

[14593 

380 

DATA 

CD, iE,BB,C2,Bl,92.3A,06,AO,CD,&55 

[2254] 

3200 PR INT:FOR 1=1 TO 10 

3210 PEN 3:IF punkte(1)=score(i)AND namett 

[14663 
£30313 

390 

DATA 

IE, BB, C2,C1,92,3A, 00, AO, FE, 00,8<4C 

[ 1850) 

1)=n*(i>THEN PEN 1 

3220 IF punkte(2)=score(i)AND name$(2)=nt( 

[32593 

400 

DATA 

C2,F9,91,3A,07,AO,CD, IE, BB, C2, &59 

[2226] 

1)THEN PEN 2 

3230 PRINT US ING"##";1; :PR I NT”.";nt(i) ; " " 

£50453 

410 

DATA 

Dl,92,3A,08,AO,CD,IE,BB,C2, El, &58 

£1779) 

; datum*(1);” ";:PRINT US!NG"######";score< 

1 ) 


420 

DATA 

92,3A,09,AO,CD,IE,BB,C2,Fl,92,&56 

[17603 

3240 NEXT I 

3250 FOR k=1 TO 5000:NEXT k:RETURN 

£3753 
[18993 

0 

430 

A 

DATA 

3A, OA, AO, CD, IE, BB, C2,01,93,3A, 8,41 

[1868) 

Listing 2 


440 

9 

DATA 

14,A0.3D,32,14,AO,FE, 00,C2,02, &39 

[1876] 

10 a = 8<9000:e=&935A:ze= 50:ab= 10 

£13623 

450 

DATA 

91,3A, 16, AO,FE,19,28,18,3C,32,&34 

[1324) 

20 FOR 1=a TO e:READ a* 

30 IF LEFT*(a*,1><>"&" THEN w=VAL<"&"+a*): 

£693 3 
[94683 

6 

460 

DATA 

16,A0,6F,26,23,CD,75,BB,3E,FF,&4A 

[2161) 

POKE i,w:s=s+w ELSE IF s=VAL(a$) THEN s=0: 
ze=ze+ab:1=1-1 ELSE PRINT"Fehler ln Zeile" 


8 

470 

DATA 

CD,5A,BB,3A,15,A0,32,14,AO,C3,&47 

[2118) 

;ze:END 

40 NEXT 1 

[375 3 

A 

480 

DATA 

02,91,3E,01,06,1A,0£,02,CD,32,&20 

[1858] 

41 PRINT"Press any key.”:CALL &BB06 

42 SAVE "!snake.bin",b,&9000,&35A 

£30483 

[20243 

1 

490 

DATA 

BC,06,02,OE,1A,3E,02,CD,32, BC, &2E 

[ 1739 ] 

50 DATA 3A,15,AO,32,14,AO,3E,05,32,16,&260 
60 DATA AO,C3,02,91,ED,5B,OB,AO,2A, OD, &420 

[16263 
£20523 

7 

500 

DATA 

CD, 2B, 93,3E, 00, 32, 13, A0,C-9,D1,&44 

t1717] 

70 DATA AO,23,23,22,OD,AO,E5,D5,CD,F0,&52C 
80 DATA BB, FE,00,C2,CB,91,Dl,El,CD,11,&667 

[17763 
[11643 

8 

510 

DATA 

El,CD,11,93,3E,01,06,1A,0E,02,&2C 

[1782) 

90 DATA 93, C3,20,91, ED, 5B, OB, AO, 2A, OD, 8<431 
100 DATA AO,2B,2B,22,OD,A0,E5,D5,CD,F0,&53 

[11083 

[33193 

1 

520 

DATA 

CD, 32. BC,CD,4A,93,3E,02,32,13,&3E 

[2018] 

110 DATA BB,FE,00,C2,CB,91,Dl,El,CD.11,8.66 

£11643 

530 

DATA 

AO, C9, Dl, El, CD,IE,93,3E,02,06,&4D 

C2473) 

120 DATA 93, C3, 20,91, ED, 5B, OB, AO, 2A, OD, 8<43 

[11083 

540 

DATA 

1A, OE, 02, CD, 32, BC, CD, 4A, 93, 3E, &3C 

C1501] 


138 PC 2’87 





Programm—i 


D 

550 DATA Oi 
0 

560 DATA 11 
E 

570 DATA 02 
E 

580 DATA FO 
8 

590 DATA 1B 
9 

600 DATA 40 
B 

610 DATA 91 
F 

620 DATA CA 
8 

630 DATA ED 
A 

640 DATA 1B 
1 

650 DATA 01 

A 

660 DATA 01 
4 

670 DATA FE 
0 

680 DATA OD 
4 

690 DATA 92 

4 

700 DATA 00 
E 

710 DATA FE 
6 

720 DATA C3 
A 

730 DATA 91 
B 

740 DATA 01 
A 

750 DATA 01 
A 

760 DATA CA 

5 

770 DATA 91 
B 

780 DATA 01 

A 

790 DATA FE. 

3 

800 DATA C3 

6 

810 DATA 91 

9 

820 DATA 02 
7 

830 DATA 02 
1 

840 DATA DE 
0 

850 DATA 3E 
A 

860 DATA C9 
D 

870 DATA CD 
A 

880 DATA OF 
890 DATA 00 
5 

900 DATA 01 

Listing 3 

10 FOR i=1 TO 10;n$ <i)=STRING$<12,") 
20 datum$<i 

30 score«i)=0:NEXT 

35 PR INT”Press any key.":CALL &BB06 
40 OPENOUT"!SNAKE.DAT" 

50 FOR i=1 TO 10 
60 PRINT#9,score«i) 

70 PR INT#9,n*(1) 

80 PRINT#9,datum*«1) 

90 NEXT i 
100 CLOSEOUT 


,32,13.AO,C9,ED.5B,OF.AO,2A,&3D 

, A0.3A, 02,AO,FE,01,28,2C,FE,A.3D 

,28,IC,FE,03,28,OC,13,13,CD,&26 

. BB, FE, 00, CA, 85,91, 18,4C, 1B, 8.50 

, CD, FO, BB, FE, 00, CA, 85,91,18,8.58 

, 2B, 2B, CD, F0,BB, FE, 00, CA, 85,8.55 

, 18, OA, 23, 23, CD, FO, BB, FE, 00,8.46 

, 85,91,3A, 88, Bl, E6,01 , FE, 00,8.53 

, 5B, OF, AO, 2A, 11, AO, 20, OD, 1B, 8.31 

, CD, FO, BB, FE, 00, CA, Fl, 92, C3,8.6A 

, 93, 13, 13, CD, FO, BB, FE, 00, CA, 8.4F 

, 93, C3, Fl. 92, 3A, 88, Bl, E6,01,8.53 

, 00, ED, 5B, OF, AO, 2A, 11 , AO, 20,8.3F 

, 2B,2B,CD,F0,BB,FE,0Ö,CA.E1,8.58 

, C3, Dl, 92,23, 23, CD, FO, BB, FE, 8.67 

, CA, Di, 92, C3, El , 92, 3A, 01 , AO, 8.53 

, 02, CA, 59,91,3£, 01,32,01, AO, 8.3C 

. 59,91,3A, 01 , AO, FE, 01, CA, 59,8.4A 

, 3E, 02,32, 01 , AO, C3,59,91,3A.8.38 

. AO, FE, 04, CA, 59,91,3E, 03, 32.8.3C 

, AO, C3,59,91,3A, 01 , AO, FE, 03, 8.42 

, 59,91,3E, 04,32, 01 , AO, C3,59,8.3E 

. 3A, 02, AO, FE, 02, CA, 85,91,3E, 8.48 

, 32, 02, AO, C3,85,91,3A, 02, AO. 8.38 

, 01 ,CA, 85,91,3E, 02,32, 02, A0.8.3F 

, 85,91,3A, 02, AO, FE, 04, CA, 85,8.50 

, 3E, 03,32,02, AO, C3, 85,91,3A, 8.3B 

, AO, FE, 03, CA, 85,91,3E, 04,32, 8.3F 

, AO,C3,85,91,E5,D5,3E,01,CD,8<54 

, BB, Dl, El, CD,EA, BB, C9, E5 , D5,8.84 

, 02,CD,DE,BB,D1,E1,CD,EA,BB.8,6C 

, 21,38,93,CD,AA,BC,21,41,93,8.4D 

, AA, BC, C9,84,02,00, C8,00,00, 8.44 

, 00,00,04,02, 00,96,00,00, OF, 8.BA 
, 00,21,51,93, CD, AA, BC, C9,84,8.48 

, 00,00,00, OF.OF, 00,00, 00, 00, 8.1F 


[2267] 

[ 1966] 

[1790 ] 

[2576] 

[2247] 

[2059] 

[ 868 ] 

[20631 

[326] 

[2013] 

[2803] 

[2096 ] 

[2362] 

C 2438] 

[1775] 

[1164] 

[1424] 

[1437] 

[1846] 

[1725] 

[2576] 

[1276] 

[25101 

[1953] 

[1810] 

[2695] 

£878 3 

[24231 

[2887] 

[16721 

C2619] 

[18813 

[2137] 

C1568 ] 
[13923 

C22073 

[1931] 
[8013 
[13783 
C30483 
[13753 
[3153 
[20913 
[820 3 
[13893 
[375 3 
[9023 


m n Michael Naujoks 


CPC 

Kassette/Diskette 

Joyce 

Diskette 

1942 

29,ga 


3D Clock Chess 

49,- 

Dragons Lair 

31,90 

1 49,90 

After Shock 

59.— 

Eleklraglide 

33,90 

/ 49,90 

Bai Man 

49,— 

Firelord 

28,90 

/ 49,90 

Slrike lor Harrier 

69,90 

Galvan 

30,90 

/ 45,90 

Fairlighl 

49,- 

Glider Rider 

28,90 

1 39,90 

Hitch Hiker's Guide 

89,- 

Hlghiack 

36,90 

/ 49,90 

Lord o( Ihe Rings 

89- 

Icon John 

28,90 

/ 44,90 

Tomahawk 

69,- 

Scoowy-Doo 

31,90 

1 49,90 

SAS Raid 

49,- 

Slarglider 

49,90 

/ 68,90 

Adressverwaltung 

129,- 

Tarzan 

34,90 

/ 49,90 

Vereinsverwaltung 

249,- 

Thai Boxing 

33,90 

/ 47,90 

Oxford Pascal 

89,- 





Hardware 

SCHNEIDER 

Software 




dk’tronics Speech-Synthesizer dk’tronics Speichererweiterungen 


(Casselte 464/664) 

DM 89,— 

64K tür 464/664 

DM 129,- 

(ROM 464/664) 

DM 129,— 

256K für 464/664 

DM 298,— 

(ROM 6128) 

'DM 139.- 

256K für 6128 

'DM 298,- 

dk’tronics Light-Pen (Farbmon.) 

dk’tronics Silicon-Disc 


(Cassetle 464/664) 

DM 59,— 

64K lür 6128 

'DM 98,- 

(ROM 4641664) 

DM 89,- 

256K lür 464/664 

DM 298 - 

(ROM 6128) 

'DM 89,- 

256K für 6128 

*DM 298,- 


Adapter für Geräte mit *: DM 29,— 


Alle Gerate ha ■ inen durchgelührlen , .Können hintereinander aul den Er 1 yy.« rt •)- steckl 

werden. Für di> 1 ' gekennzeichneten: • n Sie deshalb auch nur einen Ada. gvon 

Schneid 1 Ämslrad-Anschluß ' ■ 1 6 Monate Vollgarantie. Händleran'racwi <-rwin',itl 

Kostenlosen Katalog B2/87 anfordern! 


r 

Entwicklung & Vertrieb von 
Computer Soft- und Hardware 
. Rottmannstr 40 6900 Heidelberg 


Hotline: 

(06221) 46885 


J 


Achtung 


Disketten 


NAGAOKA 3"-Disketten CF 2 DD 
(für alle 3"-Laufwerke) 

10 er-Pack DM l Ob“ 



Diskettenboxen 


Diskettenbox SS 50 

für 50 3"- oder 3 V 2 "-Disketten, 

abschließbar/tragbar, 4 ja aa 

Rauchglas 


Ferdi’s Computer Software 


* n « 

LUV-OCI VIOC 

4 o « 

ü 

Inh. Ferdinand Göddeker 

u 

O 

e 

Höftestraße 32 

o 

0 


4400 Münster 



Telefon 0251/61 9881 



I 


2’87 PC 139 








































[—Bericht 



Ein Netzwerk 

für den Homecomputer 

Was aufgrund der Anforderungen in der industriellen Fertigung und im ge¬ 
samten Bereich der Büroautomation notwendiger Standard ist, kann auch 
im Heimbereich Anwendungen finden. Gemeint sind die Lokalen Netze oder 
Local Area Networks, die sich massiv zu einem eigenen Marktsegment in¬ 
nerhalb der Informationselektronik entwickeln. Da sich jetzt auch eine Very- 
Low-Cost Realisation abzeichnet, soll der folgende Artikel einige Informa¬ 
tionen zu Netzwerk-Konzepten, möglichen Anwendungen und realen Pro¬ 
jekten liefern. 


Der Zweck 

von kommerziellen LANs 


Local Area Networks, kurz LANs ge¬ 
nannt, gibt es schon seit langem, nur ist 
der Ausdruck LAN ein relativ moder¬ 
ner Begriff für sie. Mit der fortschrei¬ 
tenden Entwicklung der gesamten 
Elektronik hat sich jedoch auch die Be¬ 
deutung und die Komplexität der loka¬ 
len Datennetze gewandelt. Grundsätz¬ 
lich dienen solche Netze der Daten¬ 
übertragung zwischen Rechnern unter¬ 
einander und zwischen den von 
Rechnern kontrollierten Endgeräten. 
Während man hier früher vorwiegend 
Drucker, Terminals, Kartenleser u.ä. 
meinte, zählt man diese Art von End¬ 
geräten heutzutage direkt zur Rechen¬ 
anlage. Als Endgeräte im Sinne von 
LANs sind speziell in der industriellen 
Fertigung rechnergesteuerte Produk¬ 
tionsmaschinen gemeint. In diesem 


Umfeld zählen auch die Roboter dazu. 
Im Bereich Entwicklung und Konstruk¬ 
tion sind besonders kostspielige Peri¬ 
pheriegeräte, wie Laserdrucker oder 
hochauflösende Plotter hier einzurei¬ 
hen. Im Bereich Forschung und Ent¬ 
wicklung sowie in der Fertigungskon¬ 
trolle verwendet man Meßdatenerfas¬ 
sungssysteme als Endgeräte, deren Da¬ 
tenflut von Rechnern ausgewertet wird, 
die ihrerseits u.a. Produktionsprozes¬ 
se steuern. Besonders im Bereich der 
Meßtechnik mit wechselnden Aufgaben 
wurde es sehr schnell deutlich, daß teu¬ 
re, hochwertige Meßsysteme mit langer 
Nutzungsdauer und Abschreibungszeit 
nur mit einer Standard-Schnittstelle 
ausgerüstet werden durften. Nur so 
konnte man sichergehen, sich nicht der 
vielfältigen Kombinationsmögl ichkei- 
ten zu berauben, die Meßgeräte bieten 
können. Außerdem war es notwendig, 
unterschiedliche Rechner an dieses Sy¬ 
stem binden zu können, denn erforder¬ 


liche Rechenleistung und Einsatzorte 
des Meßsystems differierten zum Teil 
erheblich. In manchen Fällen ist der 
Computer sogar integraler Bestandteil 
des Meßsystems, z.B. in der Analyse¬ 
technik oder in Prozeßsteuerungen. Aus 
den genannten Gründen wurde als 
Standard der sogenannte IEC-BUS ge¬ 
schaffen, der sich seit gut zehn Jahren 
in der rechnergestützten Meßtechnik 
behauptet. 


Und daheim? 


Interessanterweise verfügte sogar der 
erste »richtige« Homecomputer, Com- 
modores PET, über eine IEC-BUS- 
Schnittstelle, die aber aus u.g. Gründen 
während der technischen Evolution ver¬ 
kümmerte (der C64 sprach nicht ein¬ 
mal mehr ASCH mit Außenstehenden). 
Dennoch liegen die Vorteile eines stan¬ 
dardisierten Datenübertragungsmedi¬ 
ums auf der Hand und in zarten Andeu¬ 
tungen finden wir sie auch in der 
Homecomputer-Umgebung realisiert. 
Speziell bei Verbindungen zwischen 
zwei Punkten sind uns Standards ver¬ 
traut, wie z.B. V24 (RS-232) oder 
CENTRONICS. Für weitere Periphe¬ 
riegeräte, außer Druckern und Akustik¬ 
kopplern, schien bisher keine einheit¬ 
liche Schnittsteilen-Notwendigkeit zu 
bestehen, vielleicht Joystick-Ports aus¬ 
genommen. Auch Tablets und Mice 
laufen über V24. 

Da es die Haushaltsmittel selten zulas¬ 
sen, mehrere Computer zu persönli¬ 
chem Gebrauch zu benutzen, entfiel 
bisher auch die Rechner/Rechner- 
Kopplung als hardwaremäßige Not¬ 
wendigkeit. Einige Hersteller bieten für 
Homecomputer IEC-BUS-Interfaces 
an. Bedenkt man jedoch, daß ein IEC- 
BUS-Kabel von 20m Länge in Indu¬ 
striequalität fast ebenso teuer ist, wie 
ein einfacher Heimcomputer und IEC- 
BUS-fahige Endgeräte in der Einheit 
»Kilomark« gerechnet werden, so wird 
die weite Verbreitung dieser Schnittstel¬ 
le kaum in Frage kommen. Wozu also 
ein lokales Netzwerk in der Wohnung? 
Es besteht prinzipiell keine Notwendig¬ 
keit für ein Heimnetz, ebensowenig wie 
für Wohnwagen, Kleingärten oder Surf¬ 
bretter. Eine Markteinführung scheint 
also nur als Freizeitangebot interessant. 
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nrsHOP 


Autor: Matthias Uphoff 


Das universelle Hardcopy-Programm 
für Schneider CPC 464/664/6128 




PEN 


PAPER 


TR AN SP 


...komfortable Menuesteuerung 
für Bildgestaltung 


11 in« 8i »Hifi eü ; 


...und Farben/Raster-Auswahl 


... Hardcopy-Simulation 
auf den Bildschirm 




IHK 21 


... beliebige Ausschnitts¬ 
vergrößerungen 

COPYSHOP Im Detail: 

- Hardcopy in 4 (!) Formaten: DIN A4. DIN A5.I3,5x 8.5cm und 
21 J5 x 13.5 cm 

- superschnelle Hardcopy-Routine: DIN A4 in ca. 4 Minuten 

- arbeitet in allen 3 Modes 

- Anpaßmenue für JEDEN Epson-kompatiblen Drucker 


...Hardcopies in 
4 verschiedenen 
Formaten 


- 32 Farbraster über Menue wählbarL 

- Grafikeditor 

- komfortable Pull-Down-Menues 

- schnelle Fill-Routine 

- beliebige Ausschnittvergrößerungen 


- läuft ebenfalls mit den Seikosha-Druckern GP-500 CPC. GP-550 CPC - Bildschirm invertieren 


und GP-1000 CPC 


- selbstrelozierbare Hardcopy-Routinen für eigene Programme 


- Anpassung an Drucker möglich, die mit 1280 Punkten pro Zeile arbei- - neue Save- und Load-Routinen erkennen automatisch Mode und Färb¬ 
ten. z.B. CPA-80 GS werte 

- Okimate ML 182 - Anpassung kann beim Verlag angefordert werden - Freezer - saved auf Tastendruck Screenshots aus laufenden Program- 


- Anpassung auch für Drucker, die die Bitbild-Bytes verkehrt herum 
drucken (das MSB unten statt oben), z.B. NEC P2-Pinwriter. 


men. die anschließend ausgedruckt werden können 


Und die Weltneuheit: Hardcopy-Simulator auf dem Bildschirm!! 

Sie können sich Ihre Hardcopy vor dem endgültigen Ausdruck auf dem Bildschirm ansehen! 

COPYSHOP ist das ultimative Hardcopy-Programm für alle Schneider Computer. 
Erhältlich auf Kassette (DM 59,-)** und 3”-Diskette (DM 69,-)** 
inkl. ausführlicher Bedienungsanleitung. 

"unverbindliche Preisempfehlung 

* Das auf dem Datenträger mitgelieferte Programm «Sreen Save*, welches beliebige Screerts 
auf Disk abspeicherl, arbeitet nur nach Enllernen des Voriex-Controllers 

COPYSHOP gibt es im guten Fachhandel oder direkt bei: 

DMV-Verlag, Fuldaer Straße 6, 3440 Eschwege 

BEI DIREKTZUSTELLUNG ZZGL DM X- PORTOA/ERPACKUNG; PER NACHNAHME ZZGL NACHNAHMEGEBÜHR 
IN DAS AUSLAND IST NACHNAHME NICHT MÖGLICH 


— Bitte Bestellkarte benutzen — Händleranfragen erwünscht — 













1—Bericht 


Ein starkes Argument für die Marktein¬ 
führung wäre auf jeden Fall ein niedri¬ 
ger Preis. Dazu müßte sich eine Palet¬ 
te von Endgeräten und interessanten 
Anwendungen gesellen. Es gibt einige 
Anläufe in dieser Richtung. Da wären 
z.B. Märklins digitale Eisenbahn und 
Fischers »Computing« oder auch das 
semiprofessionelle MIDI (Musical In¬ 
strument Digital Interface). 

Diese Produkte sind jedoch nicht für 
die breite Verwendung gedacht, son¬ 
dern »werksseitige Unterstützung« wird 
z.Z. nur für wenige, spezielle Home¬ 
computer angeboten, der Riesenrenner 
blieb bisher aus. Gäbe es jedoch einen 
preiswerten Standard als LAN- 
Schnittstelle in jedem Heimcomputer, 
so würden Gerätehersteller risikolos 
nachziehen und ihre Produkte mit ei¬ 
nem entsprechenden Interface versehen 
können. Die Vorteile sind klar, der Ab¬ 
satzmarkt für diese Endgeräte wäre 
nicht mehr abhängig vom Verbreitungs¬ 
grad eines individuellen Computertyps. 
Dieser Tatsache kommt zunehmende 
Bedeutung zu, wenn man bedenkt, daß 
Computerhersteller in immer kürzeren 
Abständen neue »Flaggschiffe« auf den 
Markt werfen. Der Computerbesitzer 
könnte das Computersystem wechseln, 
ohne die Endgeräte auswechseln zu 
müssen. Als Endgerät im Bereich der 
eigenen vier Wände kämen viele Mög¬ 
lichkeiten in Betracht: Fernsehgerät, 
Videorecorder, Radio, Kassettenrecor¬ 
der, Compact-Disc Player, Wecker, 
Heizungsanlage, Alarmanlage, Wetter¬ 
station, Lichtanlage, Aquarium, Mo¬ 
dellbahn, Codeschloß, Rauchmelder, 
Wassermelder, Waschmaschine, Trock¬ 
ner, Telefon, Kühl raum, Keyboard, 
Tiefkühlschrank, Herd.. .etc. 

Das Marktforschungsunternehmen 
Macintosh International hat hochge¬ 
rechnet, daß ausgehend von der Situa¬ 
tion in den USA bis zum Jahre 1990 ein 
Markt für Produkte zur Automatisie¬ 
rung der Privathaushalte in Höhe von 7 
Milliarden Dollar zu erwarten ist. Man 
kann annehmen, daß der überwiegen¬ 
de Teil neuer Produkte für den Haushalt 
mit Mikroprozessoren ausgestattet sein 
wird. Von daher würde sich eine Ver¬ 
netzung anbieten. So könnte z.B. die 
Heizungsregelung einen Teil ihrer not¬ 
wendigen Informationen von der Wet¬ 
terstation auf dem Dachboden erhalten, 


um damit die Regelung zu optimieren. 
Prinzipiell ist es ebenfalls jetzt schon 
möglich, filigrane Modellbau-Arbeiten 
mit numerisch gesteuerten Köordina- 
tenfräsen herzustellen und damit sei¬ 
nem Hobby völlig neue Dimensionen 
zu geben (sofern die Dimension des 
Hobby-Etats dazu paßt). 


Die Rolle des Heimcomputers 
im Netz 

Es liegt bereits einige Jahre zurück, als 
sich ein kurzer Artikel in einer populä¬ 
ren Homecomputer-Zeitschrift mit dem 
Thema »Computerhaus« beschäftigte. 
Es wurde dort nahegebracht, wie toll es 
wäre, wenn man vermittels des Home¬ 
computers allerlei automatisieren könn¬ 
te. Der Artikel schloß mit der Bemer¬ 
kung, daß die Leistungsfähigkeit eines 
Homecomputers nicht ausreichen wür¬ 
de, um alle Prozesse innerhalb des 
Haushalts koordinieren zu können, es 
wäre ein Großcomputer erforderlich. 

Bereits damals hatte diese Zeitschrift 
unrecht, denn man war von falschen 
Voraussetzungen ausgegangen. Nicht 
der Heimcomputer muß über diese Lei¬ 
stungsfähigkeit verfügen, sondern die 
Endgeräte und das Kommunikationssy¬ 
stem, es muß ein Eigenleben führen 
können. Selbst bei ausgeschaltetem 
Heimcomputer muß ein gutes LAN die 
Verbindung zwischen intelligenten Pe¬ 
ripheriegeräten aufrechterhalten. Die 
Wetterstation auf dem Dachboden muß 
weiterhin Daten an die Heizungsrege¬ 
lung liefern können und die Alarman¬ 
lage muß notfalls mit der Meldezentrale 
telefonieren können auch wenn der 
Computer abgeschaltet ist oder ein 
Adventure-Game auf ihm läuft. Die 
dazu erforderliche Hochtechnologie 
muß daher in den betreffenden Netz- 
werkteilnehmem und in der Netzwerk- 
Kontrollinstanz stecken. 


Mit »HOMELOOP« auf dem Weg 
zum Standard 

Ein norddeutsches Entwicklungsteam 
hat sich der Problematik des Netzwerk- 


Standards für Heimcomputer ange¬ 
nommen und ein Produkt erzeugt, das 
die wesentlichen Voraussetzungen zur 
Vernetzung unseres Heimes bietet. Da¬ 
bei fallen folgende markante Eigen¬ 
schaften ins Gewicht: 

- Es ist preiswert. 

- Es ist einfach zu installieren. 

- Es läßt sich mit nahezu allen bekann¬ 
ten Heimcomputem verbinden. 

Das System befindet sich im Stadium 
des Prototyps und eine Markteinfüh¬ 
rung ist im nächsten Jahr geplant. Der 
Arbeitstitel der Entwicklung ist »HO¬ 
MELOOP«, was nicht unbedingt der 
Produktname werden soll. Obwohl das 
System also noch empfindlich gegen¬ 
über eventuellen Konkurrenzprodukten 
ist, war man bereit, Einzelheiten preis¬ 
zugeben. Die Topologie des LAN ist 
ein Ring. Alle Ringteilnehmer besitzen 
einen Repeater, der dazu dient, die 
durchlaufenden Signale zu regenerie¬ 
ren. Die Verbindung zwischen zwei 
Teilnehmern erfolgt über den EIA- 
Standard RS-244, damit ist ein Teilneh¬ 
merabstand von 1,5 km zulässig. Zur 
Zeit wichtigster Netzwerkteilnehmer ist 
der Homecomputer. 

Der erste Schritt der Netzwerk- 
Entwicklung bestand darin, eine Kon¬ 
zeption zu finden, mit der es möglich 
ist, alle bestehenden Heimcomputer 
netzwerkfähig zu machen. Die Lösung 
dieses Problems ist verblüffend ein¬ 
fach. Der Heimcomputer erhält gewis¬ 
sermaßen einen zusätzlichen Mikro¬ 
prozessor, der für den Computer die ge¬ 
samte Netzwerk-Kommunikation über¬ 
nimmt. Dieser I/O-Coprozessor ist von 
einem Betriebssystem-Kern umgeben, 
dem »NEOS«. NEOS steht dabei für 
Network Operating System. Der am 
Homeloop angeschlossene Heimcom¬ 
puter korrespondiert lediglich mit die¬ 
sem Netz-Betriebssystem, alles ande¬ 
re nimmt ihm NEOS ab. Mit »alles an¬ 
dere« ist eine ganze Menge gemeint, 
zum Beispiel das Aufbauen der Verbin¬ 
dung zu einem anderen Netzteilneh¬ 
mer, das Übermitteln von Zustandsin¬ 
formationen, das Durchreichen von 
Daten, die nicht für den Teilnehmer be- 
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stimmt sind, das Schreiben eines 
Fehler-Logbuchs, das Wiederholen und 
Richtigstellen verstümmelter Nachrich¬ 
ten usw. Die Verbindung zwischen 
Heimcomputer und Netzwerk-Be¬ 
triebssystem erfolgt dabei über eine 
Schnittstelle, die es für alle gebräuch¬ 
lichen Computer bereits gibt, nämlich 
RS-232. Die für NEOS erforderliche 
Hardware ist infolge der verwendeten 
Technologie in einer Schachtel unterzu¬ 
bringen, die etwa die Größe einer Vi¬ 
deokassette hat. Die weiteren, äußeren 
Merkmale sind: 

— Zwei Schalterregister zum Einstel¬ 
len der RS-232 Betriebszustände 
und der Teilnehmeradresse des 
Netzwerkteilnehmers. 

— Eine RS-232-Buchse zur Verbin¬ 
dung mit dem Computer. 

— Ein dreipoliger, abgeschirmter 
Stecker für die Empfangsleitung 
des LAN. 

— Eine dreipolige, abgeschirmte 
Buchse für die Sendeleitung des 
LAN. 

— Eine Buchse für die Versorgungs¬ 
spannung. 

Dieses Gerät, das sich HOMELOOP 
ENTRYWAY nennt, ist Herzstück des 
gesamten Netzwerks. Der angeschlos¬ 
sene Homecomputer kommuniziert mit 
dem ENTRYWAY über ASCII-Strings. 

Prinzipiell würde ein intelligentes Ter¬ 
minal bereits ausreichen, um den Netz¬ 


betrieb zu ermöglichen. Doch bleibt 
eine wichtige Frage: Was soll man an 
dieses Netz anschließen? 


Das erste Endgerät, 
die ACTION UNIT 


»Wir wissen schon seit etwa vier Jah¬ 
ren, daß wir so ein LAN machen müs¬ 
sen. Ein Konzept dafür, jedoch in BUS- 
Topologie hatten wir auch schon vor 
eineinhalb Jahren fertig. Doch als wir 
in der Praxis soweit waren, daß man 
praktisch einen Homecomputer-Zoo 
daran anschließen konnte, standen wir 
etwas dumm da. Uns war nicht klar, 
wofür man dieses LAN tatsächlich 
brauchen würde und der apparative 
Aufwand war sehr hoch. Ein kosten¬ 
günstiger Vertrieb damit schier unmög¬ 
lich. Die Industrie als Käufer fiel auch 
aus, weil sie längst ihre Standards 
hatte.« 

So äußerte sich ein Entwickler aus dem 
HOMELOOP-Team. Das war der 
Hauptgrund, aus dem eine komplette 
Überarbeitung auf der Basis neuer Pro¬ 
dukte der Industrieelektronik erfolgte. 

Die Idee, die dem Netz zum Durch¬ 
bruch verhelfen und einen hinreichen¬ 
den Kaufanreiz bieten soll, kam erst 
dieses Frühjahr. Zur Markteinführung 
soll ein Set aus ENTRYWAY und ei¬ 
nem weiteren Gerät, der ACTION 
UNIT angeboten werden. Damit ist der 
Benutzer zunächst auf alle Zeiten 


LAN-fahig (vermutlich auch LAN- 
abhängig) und besitzt auch sein erstes 
Endgerät. Dieses Endgerät allein soll 
dabei bereits Anreiz genug sein, sich 
zum HOMELOOP zu entschließen. 

Auch nach massivem Drängen war nie¬ 
mand bereit zu verraten, was sich hin¬ 
ter dieser ACTION UNIT verbirgt. Wir 
sind darauf angewiesen, die offizielle 
Markteinführung abzuwarten. Bei der 
Frage, ob eine RS-232-Verbindung zum 
Homecomputer nicht viel zu langsam 
sei, wurde folgende Antwort geliefert: 

»Die meisten verfügbaren Homecom¬ 
puter können auf systemexterne Nach¬ 
richten gar nicht schneller reagieren, 
als es über einen seriellen Kanal mög¬ 
lich ist. Die Homeloop-Endgeräte da¬ 
gegen verkehren über NEOS ohnehin 
schneller miteinander, weil die Über¬ 
tragungsraten höher sind und die Pro¬ 
tokolle komprimiert werden. Die Eigen¬ 
intelligenz der Endgeräte macht au¬ 
ßerdem nur den Austausch kurzer 
Kommandos notwendig, weil die da¬ 
hinterstehende Ausführungsleistung 
vom Endgerät selbst erbracht wird. 

»Möglicherweise ist es angebracht, bei 
einem geplanten Computer-Neukauf 
darauf zu achten, daß das Gerät eine 
RS-232 Schnittstelle besitzt oder daß 
sie nachrüstbar ist, darüber hinaus ist 
Geduld angesagt.« Vielleicht ergibt sich 
mit diesem LAN ein neues Anwen¬ 
dungsspektrum für den heimischen 
Computer, warten wir es ab. 

(Dipl.-Ing. H. Bruhns) 


SCHNEIDER PC 

PC 1512 SD 1 Diskettenlaufwerk 1898,-12385 - 

PC 1512 DD 2 Oiskellentaulwerke 2349.-/2749.- 

PC 1512 SD 20 MB 1 Laulwerk. 20 MB Festplatte 3699,-/4299- 
Aulpreis lüi Version Better BASIC 348,- 

Festplalle 20 MB lür den PC 1320 - 

SOFTWARE FÜR DEN NEUEN PC 
Wordstar Junior mil MailMerge 389,- 

dBase II Junior 389- 

Multiplan Junior 289.- 

Tnrbo Pascal 285, - 

MST Fibu professionelle Fmanzbuchhallurrg 1450.— 

WINDOW ADRESS Adressverwaltung 98.- 

WIND0W KASSE kom. Kassenbuchliihrung 98.- 

CARAT AUFTRAG PC prof. Auftragsabwicklung mil Arlikell. 
Kundenslamm, Lieleianlensl., EK, VK. Statistik 979- 

CARAT LAGER PC kom Lagerhaltung 289- 

PANASONIC. DRUCKER 

KX P 1080 669- KX P 1091 789- 

KX P 1092 1048. KX P1592 1399- 

passendes Orucketkabel 49 - 


VORTEX 

Fl S 919- 

F1X 709- 

M1S 909- 

M1X 729- 

SP-256 279- 

Aulrustsatz 256 KB 

10 Stück Panasonic 3" CF2 Oisketlen 

10 Stuck Veibatim 525" OS DD Diskellen 

10 Sluck 3" CF 2 DO Disketten tu> Joyce • 

3-Zweltlaulwcrk 1 Joyce (1 MB) 

5 25 ! Zweitlaulwerk I Joyce (1MB) 

20 MB Feslplalte für Joyce 
Bildschirmvorsatz f Joyce 
256 KB Rameiweilerung lür Joyce 
kompl AulrUstsalz Joyce — Joyce 4 
Traktorautsatz lur NIQ 401 
Datenrecorder lür CPC 664/6128 
Mirage Imagei 
CPC MousePack 


Flü 
Fl-XRS 
MID 
M1XRS 
SP 512 


SOFTWARE 

Verbentrai/ter ENGLISCH I CPC 

Joyce 

Vokahetlrainer lür Englisch und Latein CPC 

Joyce 

Caral Lager plus umtangi Lagerverwallung Joyce 

Carat Kasse plus prol Kassenbuchiuhrung Joyce 

Caral Aullrag (5 linke Spalte) Joyce 

M&T Finanzbuchhailung CPC/Joyce 

DR DRAW prol Zeicbenprogramm Joyce 

DR GRAPH graph Darstellung von Daten Joyce 

Wordslar/dBase Il/Multiplan CPC/Joyce 

Pakei Wordstar + dBase II * Multiplan 
Arche, extrem schnelle Daleiverwalturig CPC/Joyce 

Turbo Pascal 30 CPC/Joyce 

Tdibo Pascal mit Grafrkunlersl CPC/Joyce 

Turbo Graphik Toolbo> CPC 6128 

Microsoft Basic Compiler CPC 

Platmenkil (s Sonderanzeige) 

Der Versand erioigl oer Nachnahme oae> 
Wirauskasse (2% Skonto) 

Alle Preise zzgi Versandkoslenanleii' 


39 - 149 . 
59 

45.—755 
59 
288 
-188. 
4B8 


179 
/e 179, 
499 ■ 


275 

215 

199 


- 


TG-Soft ■ Offersdorf 5 ■ 8491 Rimbach ■ Tel. (09941) 3765 
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Vokabeltrainer, ein aus¬ 
gereiftes Übungsprogramm. Er be¬ 
rücksichtigt die wichtigsten pädago¬ 
gischen Grundsätze. Beliebig viele 
Lektionen können gelernt, geübt 
und abgefragt werden. 

C 39,- D 49,- 

Joyce D 59,-- 

Verbentrainer 

Programm zum Üben der unregel¬ 
mäßigen englischen Verben 
C 29,- D 39,-- 

Joyce D 49,- 



Amdrum 

- das überragendste Steckmodul, das 
je entwickelt wurde 

- 8 digital aufgenommene realistische 
Drum-Geräusche 

- einfach zu bedienen 

% - kreativ, lehrreich und unterhaltsam 

- umfaßt mehr als 1000 program¬ 
mierte Rhythmen 

- Songs können auf Band gespei¬ 
chert werden 

- komplett mit Software und deut¬ 
schem Handbuch 

- für 464,664,6128 138,- DM 

• Adapter für 6128 30,- DM . 


/'^Hervorragende Programme für Handel, 

Handwerk und Gewerbe. 

Business Star 

- Fakturierung 

- Lagcrverwaliung 
Mahnwesen 

- OMene Posten Buchhaltung 

- Daienverwaltung 

- Dienstprogramme 

Preis 290.- DM 

Ftbu-Star-Plus 

- Stammdatenverwallung 

- Umsatzsteuerverwaltung 

- Freier Kontenrahmen 1400 Konten) 

- Zuordnung Sachkonten 
Buchungsjournal 
Summe Saldenlisten 

- Nach Belegnummern sortierl 

Preis 298,- DM 


Star-Mail 

- LocoScriplerweiterung 

- Rechnen +• Kalkulieren 

- Tabellen + Formulare 

- Interaktives Brtefeschreibon 

- Erstellen von Serienbnefen 

- Rechnungen + Angebote 

- Verkaufs Artikel-Lager-Listen 

Preis 98.- DM 

Star-Base 

- Datenbanksystem 

- Eigener Window Manager 

- Menueorientiert 

- i0C Datenfelder je Maske 
88 Zeichen pro Dalenleid 

■ Suchen und Seleklieren 

- Arbeitet mit LocoScript 

- Senenbrielerstellung 


Preis 198,- OM 

Joyce-Maihng-System 189, - DM 

Daiei-Star 

98,- DM 

Stalistic Star 

98,- DM 

’ Für CPC 


' Star-Writer 1 

198,- DM 

Slar Mon 

59,-/79,90 DM 

• Mai he-Slar 

69,90/79,90 DM 

Stalistic Star 

59,90/79,90 DM 

Cooy Star II 

29,90/39,90 DM 

\^Fibu Star Plus 

298,- DM/ 
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Supercopy 


Das Diskettenkopierprogramm der Superlati¬ 
ve für Schneider CPC 464, 664, 6126 und 
Joyce 

Mit dem absoluten Servicehammer, der für 
höchste Qualität spricht Sollte SUPERCOPY 
einmal etwas nicht schaffen: 

Senden Sie die Originaldisketle Ihres Pro¬ 
gramms und von SUPERCOPY an den Her¬ 
steller, dann erhalten Sie kostenlos eine neue 
Version incl. der Erkennung des neuen Ko¬ 
pierschutzes 

- Sicherheitskopie aniegen möglich! 

- Sehr bedienungsfreundlich und schnell 

- 100% MC. bearbeitet alle 43 Spuren 

- Unterstützt 2 Laufwerk, mit Laufwerks¬ 
optionen: 

A-A. A-B. B-B, B-A (CPC’s) 

- Volle Speicherausnutzung bei Joyce und 
Joyce plus 

- Jede mögliche Sekiorgröße. -anzahl, 
Spurnr.. Koplnr. 

- Sekioren mit gelöschter Data ADRESS 
MARK 

SUPERCOPY kopiert 99,9% der auf dem 
Markt belindlichen Software 
(1:1 Sicherheitsduplikat)!!!! Ein unentbehrli¬ 
ches -Disc-Tool- für jeden CPC- und Joyce- 
Besilzer 


3" Disketie für Joyce 
^ Diskette für CPC’s 


89,- DM 
79.- DM / 



ACHTUNGtü 

Die Sensation der Amstrad Computer-Show In London 

Multiface - 
das Kopierprogramm 

Mullilace two - das heißt für Sie 3 Funktionen 
in einem!!!!! 

- Vollständige Kopiereinrichtung tür Kassetten 
und Disketten 

- Besteht aus BK-Ram und 8K-Rom Erweiterung 
und wird lediglich aut Expansionsport Ihres 
CPC (4M. 6M, 6128) aulgesteckt 

-Wahlweises Kopieren von Kassette aut Diskette und umgekehrt, sowie von Kassette zu 
Kassette und Diskette zu Diskette 

-Kopiert jedes im Speicher stehende Programm aut Kassette oder Diskette 
-Einsichlmoglichkeit in Programme und Hardware über Bildschirm 

- "Fried" sowohl Bild als auch Programm an tedem beliebigen Punkt ein. speichert es ab 
und macht späteren Zugrill möglich (hervorragend geeignet lür Gratikanwendungen) 

-Menugesleuert und vollständige Fehlerabsicherung 

- Komprimierte Oatenabspeicherung dadurch geringer Bedarf an Speicherplatz auf 
Ihrer Kassette oder Diskette 

-Ladezeit von 64K Programmen Diskette unter 20sec /Kassette unter Min 
-Resellaste eingebaut, oeemträchtigt nichl 8KRam Erweiterung 
Weitere Anschlußmöglichkeden über Erweiterungsbus 

Einführungspreis 178, - DM 
Adapter für 6128 30, - DM 


Spiele für Joyce 


1 3D Clock Chess 

79,90 DM 

13 Invaders 

88,- DM 

2 Aftershock 

69,90 DM 

14 Classicadventures 

6B, - DM 

3 Batman 

59, - 

DM 

15 Wishbringer 

98,- DM 

4 Bridge Players 

59,- 

DM 

16 Bounder 

65, - DM 

5 Cyrus Chess 

69,- 

DM 

17 Scrabble 

78,- DM 

6 Fairlight 

59,- 

DM 

18 Jewels of Darkness 

78,- DM 

7 Heroes of Kharn 

59,- 

DM 

19 Go Gooth's Cricket 

78, - DM 

8. Hitchhikers 

99,- 

DM 

20 Coiossus 4 Chess 

79,90 DM 

9 Lord of the Rings 

99,- 

DM 

21 Blackstar 

59,- DM 

W SAD Raid 

59.- 

DM 

22 Quiwi 

69,- DM 

11 Space Invaders 

49,- 

DM 



12 Tomahawk 

79,- 

DM 



V 








Rom-Box 

- Die Rom-Steckplalzerweiierung lür Ihren CPC 

- 8 Rom-Stockplätze 

- Rom-Nummer 0-7 sowie 8-15 frei wählbar 

- Zusätzlicher Expansionsbus 

- Rom-Auswahl über DIP-Schalter 

- Erlaubt Verwendung -langsamer- und 
■schneller- Roms 

- Einfache Installation (wird einlach auI Expan¬ 
sionsbus gesteckt) 

- Verwendung' von -Selbstgebrannten- sowie 
Firmenroms möglich 

- Roms belegen keinen Speicherplatz, somit ist 
die Rom-Box die ideale Hardwareerweilerung 
für Sie, Ihr CPC wird damit flexibler! 

139.- DM 
30, - Dh&/ 


\Adaplerfür 6128 


Wichtiges Zubehör 

CPC 464 grün/color 677,-/1162,— 
CPC 6128 grün/color 969,-/1648- 
Datenrecorder m. Kabel 98,— 

Drucker NLQ 401 598,- 

Schneider Drucker DMP 2000 698,— 

Star SG 10 798,- 

Star NL 10 968,— 

Star NL 10 (engl Import) 796,— 

Riteman F + 898,— 

RitemanC+ 798,— 

Panasonic 1091 998,— 

Panasonic 1092 1098,— 

Okimate 20 (Cotor-Drucker) 870,— 
MP1/2 148,—/168 — 

RS 232 (V24) m. Sottw 168,— 

Ughtpen 6128 139,— 

Ughtpen 464,664 98,— 

Sprachsynthesizer dk-tronic 159,— 
Rollenhalter NLQ 29,80 

Papierrollen je 12,60 


Abdeckhauben aus grauem Kunstleder 
Konsole 464,664,6128, 

NLQ,DMP je 19,80 

Floppy DDI-1 .FDI-1 .Vortex, 

F1-D/S je 16,60 

Monitor grün/color je 29,80 

Druckerkabel 464,664,6128 48,50 

Verlängerung Monitor-Konsole 
464 29,BO 

Verlängerung Monitor-Konsole 
664,6126 39.80 

Schutzhaube Rauchglas 35,— 

DhJCkerständer 98,— 

Monitor Drehständer 48,— 

Farbband Okimate 2.0 Black/Color 19,— 

Farbband NLQ 401 14,80 

Farbband DMP 2000 19,80 

Farbband Star SG 10/NL10 9,80/29,80 

Farbband Panasonic 
1091/1092 29,80 

Disketten 5 1/4* DS/DD 10 St. 39,- 

Disketten 5 1/4* SS/DD 10 St. 29,- 

Disketten'3,5* 1DD 10 St. 59,— 

Disketten 3,5* 2DD 10 St. 89,— 

□iskettanbox 3*. 3,5* 

40/80 St. 39,80/49,80 

Telefonmodem 298,— 

Endlospapier 1000 Blatt 38,— 

Joystick Schneider 39,BO 

Joystick Quick Sbot 1/1! 19,80/24,80 

Competition Pro 5000 59,— 

Traktor lür NLQ 401 79,50 


Wir unterhalten ein großes Lager für Hardware, 
Software und Zubehör. Einzelinfo bitte anfordem 


Potsdamer 


Backnang • ■ *2* 07191/1528-29 
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f Elektric Studio- Produkte 

für Joyce 

Light pen, Freihandzeichnen auf 
Monitor, Abspeichem möglich 

- Hardcopy der Bilder auf Joyce 
Drucker in 3 Größen möglich 

- gängige Funktionen wie Bleistift, 
Sprühdose, Radiergummi, Invers 

278,- 

Maus hochwertig mit Interface 

- Zeichensoftwareorogramm wie 
beim Light pen (kunstbercich) 

- Joystickanschluß am Interface 

Info anfordem 448,- > 



dk-tronics Joyce-Zubehör 

auf das Sie schon lange gewartet 
haben: 

- Joystickadapter 98,- 

- Joystickadapter mit 3 Kanal 
Sound Synthesizer 158,- 

- Echtzeitunrenmodul 138,- 

- Adapter für Centronics- 

anschluß 30,- 






















































f Mirage Imager 

Sicherheitskopie ? 

- Kein Problem 

Dafür gibl es jetzt den 'MIRAGE IMAGER"! 
Extrem einlache Handhabung. Überträgt 
jedes Programm auf Diskette oder 
Kassette durch einlachen Tastendruck. 
Unterbricht jedes Spiel an beliebigem Punkt, 
sichert es und macht späteren Zugriff 
möglich. 

Anwenderfreundlich durch Menuesteuerung 
und 100 % Fehlerabsicherung. 

Sehr hohe und leistungsfähige Kompri¬ 
mierung, benötigt somit ein Minimum an 
Kapazität auf Ihrer Diskette oder Kassette. Bei 
Abspeicherung aul Kassette zwei Geschwin¬ 
digkeiten wählbar 

Besteht aus 8K-Rom und 8K-Ram Hard¬ 
ware und wird lediglich auf den Expansions- 
nort Ihres CPC (464,664.6128) aufgesteckt. 
Achtung!!!!! Nur erlaubt für Ihre persönli¬ 
chen Sicherheilskopien! 

Einführungspreis 198 ,- DM 

Adapter für CPC 6128 30,- DM 


dk-tronics 

- Speichererweiterung 64k 198,- DM 

- Speichererweiterung 256k 298 - DM 

- Sprachsynthesizer 158,- DM 

- A-RS 232 (orig Amstrad) 248- DM 

- Soundsynthesizer SSA 1 148,- DM 

- Uhrenmodul 138,- DM 

- Joystick-Adapter 98,- DM 

- Joystick-Adapter mit 3-Kanal 

Sound Synthesizer 158,- DM 

- Adapter für Centronics- 

Anschluß 30,- DM 


Unser neuer Schaltungs- 
Service für 
Schneider Besitzer 

(aufwendig, sehr umfangreiche 
Dokumentation) 

CPC 464-664-6128 je 15,- DM 
PCW 8256-8512 je 15,- DM 
CTM 644 15,- DM 

CTM 640 - GT64/65 je 12,- DM 


/ Unser Public-Domain- 
Service 

Speziell für Sie!!! 

Ca. lOOO Programme auf 256 Disket¬ 
ten warten auf Ihren Einsatz!! Beste¬ 
hend aus amerikanischen, englischen 
sowie deutschen CP/M Programmen 
für Ihren CPC 464,644, 6128 und 
Joyce. Unter anderem sind dabei: 

- Pascal Compiler 

- C-Compiler 

- Forth 

- Lisp 

- dBase Programme 

- Tips & Tricks dBase 

- Assembler 

- Disassembler 

- Diskettenmonitor 

- Z 80Assembler 

- Massenweise Utilities 

- Texteditor 

Dies ist nur ein kleiner Ausschnitt aus 
unserem reichhaltigen Angebot. Der 
Gesamiprogrammkaialog wird bei 
der Erstoeslellung mitgeliefcrt! 

Jede Diskette (3”, 3,5", 5 1/4") 

20,- DM 


Grafpad 111 (neu) 

• Auflösung: 1280 x 1024 Bildpunkte 

• Abweichung: ± 1 Pixel 

• Zeichenfläche: DIN A4 

• hochauflösende Graphik 

• Schaliungsdiagramme 

• CAD 

• Abmessungen 350 x 260 x 12 mm 

• Optionswahl vf 

• Formeingabe ' 

• Bilderspeicherung und Abruf 

6128, Joyce 548»- 

v PC, IBM-Kompaiiblc 798,- 



Gerdes-Maus 

Mil leislungslahiger Software 
1 Basic-Erweiterung (60 Befehle) 

2. Centaur-Grafikverarbeitung 

3. Kurze Programmbeschreibung 2*.S,— 


AMX-Mouse - oft kopiert aber 
nie erreicht! 

Sie erleichtert die Benutzung des 
Mikrocomputers und stellt einen 
großen Fortschritt dar. 

- Benuizerfrcundliches System 

- Steuerung des Computers über 
Bildschirm 

- Text und Graphik können ver¬ 
mischt werden 

- mit Software ähnlich Macintosh 
und Atari 520ST 

-464,664,6128, Joyce, 278,- 

- Adapter 6128 , Joyce , 30,- 

- mit deutschem Handbuch 




Page Maker - kombinierbar zur 
AMX-Mouse 

- erlaubt Herstellung von Zeitungen, 
Poster und Handzettel 

- professionelle Text- und Graphik- 
darstellung 

- benötigt 64k Zusatzspeicher bei 464 
und 664 

-16 Schriftlypen vorgegeben, Ent¬ 
wicklung eigener Schriftlypen 

- Zeichnen, Sprühen und Malen 

- nur Disketlenvcrsion 

- mit deutschem Handbuch 

- dieses Produkt ist jeden Pfennig 

von 178,- DM wert _ / 


Der neue Schneider PC 


PC MM/SD 

512 kB Rechner 4 Monitor -* 
Laulv.erk 

PC MM/OD 

512 KB Rechrei + Monitor -* 

2 Laufwerke 

PC CM/SO 

512 kB Rechner - Farbmon h 
L aulv.erk 

PC CM/OD 

512 kB Rechnei 4 Farbmon - 

2 Laufwerke 

PC MM/HD 10 

512 \ ß Rechner 4 Monitor 

4 Laufwerk 

+ 10 MB Fesloialte 

PC MM/H0 20 

512 kB Rechner 4 Monitor 4 

Laufwerk 4 

20 MB Feslplalle 


1.999,- DM 


2.499.- DM 


2.499,- DM 


2.999.- DM 


3.499,- OM 


3.999,- DM 


PC CM/HO 10 

512 kB Rechner 4 Farbmon 4 
Laufwerk 4 
10 MB Feslplalle 

PC CM/HD 20 

512 kB Rechner + Farbmon * 
Laufwerk 4 
20 MB Fesinlaüe 


3.999.- DM 


4.499 - DM 


SKG BANK 
Bequem-Kauf-Kred’rt 


Wir bieten Ihnen auch günstige Leasing¬ 
konditionen. um Ihnen bei geringen (man 
zielten Belastungen den Kauf unserer PC- 
Hardware zu ermöglichen 
Zum Beispiel 

Joyce-t- Kaufwert 2490,- DM 
Erste Leasingrate 83,61 DM 

35 Leasmgralen ä 84,- DM 

Bitte setzen Sie sich mit uns in Verbin¬ 
dung. Wir beraten Sie gerne! 


Alles für 

Farbband Drucker 29.90,-- 

1 MB-Laufweik FD 2 598,— 

Parallel-Seriellschnittstelle 148,— 
Smal C 99,- 

Prompt (Dateivcrwaltung) 69,— 
Micor (CAD) 198,» 

Turbo Adress Joyce 169,- 

Dr. Graph 199,— 

dBascII, Wordstar je 199,- 
Profirem (Adress, Artikel) 178,-- 
Fakturem 98,- 

Adressdatei 58,- 

\Turbo-Pascal _ 225,-- 


den Joyce 

RAM-Erweiterung 256 k 149,- 
Bildschirmfilter 89,— 

C-Basic-Compiler 169,- 

Locoscripl (Kurzanleitung) 29.50 ,— 
Prompt-Druck 39,— 

RH-Dat 89,~ 

Dr. Draw 199,- 

Vereinsverwaltung 199,— 

Multiplan 199,- 

Fibuking 136,-- 

Lagenlatei 68,- 

Headline 198,-- 

Faktum 10 148,- 


C.NCI IIJOTCN.:NCl IIJCirrN 
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»Unsere Special Adventure-^ 
Der Diamant von Rabenfels 
Reise durch die Zelt 
Sherlock Holmes 
Auftrag In der Bronx 
Drachenland 
Die Insel der Smaragde 
Das Pharaonengrab 
Ruan 
ie Advenlure 

C 29,-. D 39,- 


FI S 3,5“ oder 5 1/4" 708 Kß-Lautwerk 
bzw. M1-S 3,5" 

oder 5 1/4" 708 KB-Laufwerk 998,- DM 

F1-D 3,5" oder 5 1/4" 1,4 MB Lautwerk 
bzw. MI D 3,5" oder 

5 1/4" 1,4 MB-Laufwerk 1.498,- DM 
...I X 3,5" Lautwerk + X-Modul = 88 KB 
bzw. FI X 5 1/4"Laufwerk + 

X-Modul = 88 KB 758,- DM 

...l-XRS 3,5" Laufwerk + RS 232 
bzw F1-XRS 5 1/4" Laufwerk 
+ RS 232 858,- DM 

20 MB Harddisk + 

08 KB Laufwerk 3.298,- DM 

WO 20 Subsystem 

ohne Laufwerk 2.998,- DM 

SP 256 Speichererweiterung 298,- DM 
SP 512 Speichererweiterung 398,- DM 


1. Bat-Man 

29,749,- 

2. Camelot warnen 

29,749,- 

3. Donkey kotig 

39,759,- 

4. Explorer 

35,749,- 

5. Hader II 

39,759,- 

6. Howard tbe duck 

35,755,- 

7. Dcari 

39,749,- 

8, Keren Ta Golf 

39,749,- 

9. Miami vice 

35,759,- 

9. One 

35,759,- 

10. Scoctoy doo 

39,759,- 

11. Street machine 

29,749,- 

1Z The way of the tiger 

35,749,- 

13. Top Gun 

29,749,- 

^14. Werner 

29,749,^/ 


q Hiermit bestelle ich per Nachnahme 
(Versandkostenpauschale 6.80 DM) 


Sink Kmukm 
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Rechenaufgaben 

Generator 



Programm zum Erstellen von Arbeitsblättern mit forma¬ 
len Rechenaufgaben für Schule, Nachhilfestunde und 
Übungen zu Hause. 

Hallo Schüler, 

kommt es vor, daß Du den Mathestoff eigentlich verstanden 
hast, Dich aber beim Ausrechnen der Aufgaben immer wie¬ 
der verrechnest? 

Hallo Lehrer, 

kannst Du einen unerschöpflichen Vorrat an Mathe-Arbeits- 
blättem gebrauchen, um mit Deiner Klasse oder mit einzel¬ 
nen Schülern immer mal wieder die vier Grundrechenarten 
zu üben? 

Hallo Eltern, 

wollt Ihr Eurem Kind bei seinen Mathe-Problemen selbst hel¬ 
fen und wißt nur nicht recht, was es denn nun üben soll? 

Hallo Student, 

gibst Du vielleicht Mathe-Nachhilfestunden und suchst für 
Deinen Schüler Übungsaufgaben, die ihn im Rechnen siche¬ 
rer werden lassen? 

Dann ist dieses Programm für Euch genau das richtige; es 
erzeugt mit dem CPC 464 und dem neuen Schneider-Drucker 


DMP 2000 ganz nach Wunsch 

— entweder ein Arbeitsblatt mit beliebig vielen Kopfrechen¬ 
aufgaben 

— oder ein Aufgabenblatt mit 16 Aufgaben und einer Ergeb¬ 
nis-Kontrolle für das schriftliche Rechnen im Heft 

— und natürlich zu beiden Schüler-Aufgabenblättern jeweils 
das Kontrollblatt für den Lehrer mit den fertigen Lösun¬ 
gen. 

Die Aufgaben üben die Beherrschung der vier Grundrechen¬ 
arten Addition, Subtraktion, Multiplikation und Division 
beim schriftlichen Rechnen im Zahlenraum bis zu den Mil¬ 
lionen und beim Kopfrechnen im Zahlenraum bis 100 in ver¬ 
mischten, stets wechselnden Aufgabenstellungen und entspre¬ 
chen in ihrem Schwierigkeitsgrad dem Leistungsstand am 
Ende der Grundschulzeit — das heißt: Für jeden Schüler der 
Hauptschule, Realschule und des Gymnasiums sind diese 
Aufgaben eine gute Übung zur Festigung seiner Rechen¬ 
kenntnisse und zur Steigerung der Rechenfertigkeit. 

(K.Kracht, TM) 


für 464-664-6128 

r~ 



lOOO ’ PROGRAMM ZUM ERSTELLEN VON ARBEITSB 15055] 
LAETTERN MIT FORMALEN RECHENAUFGABEN 
1010 ’ fuer Schule, Nachhi1festu C3914] 

nde und Uebungen zu Hause 

1020 * - C3553J 


1440 * TITEL C 643 3 

1450 * ===== [332] 

1460 MODE 1 C506] 

1470 L0CATE#0,8,7:PRINT*0,"RECHENAUFGABEN [3863] 
- GENERATOR" 

1480 LQCATE#0,8,8:PR INT#0, "_ [3832] 


1490 L0CATE#0,8,11:PR!NT#0,”<K>-Kopfrechne [30691 
n" 

1500 LQCATE#0,8,14:PRINT#0,”<S>-Schriftlic [2461J 
hes Rechnen" 

1510 FÜR c=0 TO 4:PLOT 71-4»c,310+2*c [2044] 

1520 FOR 1=1 TO 8:READ x, y:DRAWR x,y:NEXT [2352] 
1, c 

1530 in$ = LOWER®(INKEY*):IF in$ = "k"THEN 238 [6192) 
0 ELSE IF in$="s”THEN 1620 ELSE 1530 
1540 DATA 0,-140,40,-40,420,0,40,40,0,140, [3074] 
-40,40,-420,0,-40,-40 

1550 DATA 0,-144,42,-42,424,0,42,42,0,144, [2819] 
-42,42,-424,0,-42,-42 

1560 DATA 0,-148,44,-44,428,0,44,44,0,148, [25901 
-44,44,-428,0,-44,-44 

1570 DATA 0,-152,46,-46,432,0,46,46,0,152, [3073] 
-46,46,-432,0,-46,-46 

1580 DATA 0,-156,48,-48,436,0,48,48,0,156, [27143 
-48,48,-436,0,-48,-48 

1590 » - [3553] 


1600 ’ TEIL 1 * SCHRIFTLICHES RECHNEN [1783] 

1610 * ================================ [2011] 

1620 MODE 2 [5133 

1630 DIM res(16) [552] 

1640 ’ zahlen finden: (9963 

1650 div=INT< RND(TIME)»10):IF div<6 THEN 1 [32013 
650 

1660 FOR z=1 TO 4 [10433 

1670 nura(z) = I NT(RNDCTIME)«100000) »d i v [11493 

1680 IF num(z)<500000 THEN 1670 116263 

1690 NEXT 13503 

1700 sum=INT(RND<TlME)»10000000) £23003 

1710 sub=1 NT(RND(TIME)»1000000):IF sub>500 £38003 
000 THEN 1710 

1720 mu1 = I NT(RND(TIME)»1000):IF mul<600 TH £21123 
EN 1720 


146 PC 2’87 
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1730 zet*<i)=" + "iope(1)=sum [16863 

1740 zel*(2)=" - ":ope(2) = sub [10693 

1750 zel*<3)= n . " : ope < 3)=mu! C1533] 

1760 zei$(4)= " : ":ope(4)=div C1582] 

1770 ' aufgaben zusammensteilen und format [37913 
lert ausgeben: 

1780 CLS#0 C 374 3 

1790 IF n=0 THEN PR INT#n,"Sohr 1f11Iches Re [3818] 
chnen:" ELSE 1810 

1800 PR I NT#n, "-":G0T0 [2893] 

1860 

1810 IF i * = "a" THEN 1840 C677] 

1820 PR INT#n," LEHRER - KONTRO C3169] 
L L B L A T T" 

1830 PRINT#r»,STRING*(43," = ">:G0T0 1880 [2455] 

1840 PR I NT#n,"Schreibe diese Aufgaben ln D CS220] 
ein Heft und rechne sie aus:" 

1850 PR I NT#n,STRING* < 56," - ") [2092] 

1860 PRINTtn [5773 

1870 FOR z=l TO 4:PRlNT#n,z;".> ";:F0R q=l [28113 
TO 4 

1880 PR INT#n,TAB(9)num(z);zei*(q); C29653 

1890 PRINT#n,USlNG"#########”;ope(q);:PR IN [32633 
T#n," ="; 

1900 IF i*="k" THEN PR INT#n,TAB<33>US ING"# [47613 
#########";erg(q,z) ELSE PR I NT#n 
1910 NEXT [3503 

1920 PRINT#n [5773 

1930 NEXT [3503 

1940 * ergebnisse errechnen: [6633 

1950 FOR z=l TO 4:q=1:erg(q,z)=num(z)+sum: [30423 

NEXT 

1960 FOR z=i TO 4 : q = 2:erg<q,z)=num(z)-sub: [36523 
NEXT 

1970 FOR z = l TO 4 : q = 3: er g<q, z> =*num(z) »muI : [35943 
NEXT 

1980 FOR z=i TO 4:q=4:erg(q,z)=num(z)/div: [22083 
NEXT 

1990 ' ergebnisse sortieren; [9563 

2000 j=l [4113 

2010 FOR q=1 TO 4 [9513 

2020 FOR z=l TO 4 [10433 

2030 res(j)=erg(q,z) [11973 

2040 j=j+l [5443 

2050 NEXT z,q [3883 

2060 zres=16 [7053 

2070 g=I NT < zres/2) [8883 

2080 WHILE g>0 [11223 

2090 FOR i=g+i TO zres C13613 

2100 J=i-g [3543 

2110 WHILE J>0 [9993 

2120 IF res< JX = res( J+g) THEN J=0:GOTO 217 [27083 

0 

2130 a=res(j+g) [10883 

2140 res<j+g)=res<j) [8973 

2150 res(J)=a [6603 

2160 j=j-g [3343 

2170 WEND [3903 

2180 NEXT [3503 

2190 g=1 NT(g/2) C5373 

2200 UEND [3903 

2210 ' ergebnisse sortiert ausgeben: [17703 

2220 IF i * = "k" THEN 2290 [9193 

2230 PRINT#n,"Hier sind die Ergebnisse:"; [39623 

2240 tb=31:FOR j = l TO 3:G0SUB 2360:NEXT:PR [22733 

I NT#n 

2250 PR 1 NT#n, "-[24813 

2260 tb=31:FOR J=4 TO 6:G0SUB 2360:NEXT [14193 

2270 tb=1:FOR j=7 TO llsGOSUB 2360:NEXT [11343 

2280 tb=l:FOR j=12 TO 16:G0SUB 2360:NEXT [I486] 

2290 IF n = 8 THEN PR INT#n:PRINT#n,STRlNG*(7 [23963 

9," = "> 

2300 * aufgabenb1att bzw. kontroI1b1att au [27833 
sdrucken: 

2310 GOSUB 3200 [9533 

2320 i*=LOWER*<!NKEY*>:IF i*="a"OR i*="k"T [42873 

HEN 2340 ELSE? IF i* = "n" THEN RUN 1620 
2330 GOTO 2320 [3473 

2340 IF i*=”k” THEN kb=kb+l ELSE ab=ab+i [19363 

2350 PRINT#8,CHR*(27);"M";CHR*(27);"1";CHR [29213 

*(15):n=8:GOTO 1810 

2360 PRINTtn,TAB(tb)US ING"##########";res< [36753 
j) ; :tb = tb+15:RETURN 

2370 ' - [35533 

2380 ’ TEIL 2 * KOPFRECHNEN [9003 

2390 ’ ====================== [15793 

2400 MODE 2 [5133 


79- 


Augen auf beim 
Computerkauf 

Die NEULN Schneider PCs letzt ab Lager lieferbar 
PC 151? 1 Laufwerk Monochrom Bildschirm 183 
PC 1512 2 Uutwerke Monochrom Bildschirm 2338. 
PC 15121 Lautwerk Goloi Monitor 2499.- 

PC 1512 1 Laufwerke Color Monitor 2399. - 

20 MB Filecard (ür PC 1512 und kompatible 1398. 
20 MB Festplalle Seagate ml Conirotler und Kabelsatz 1198. 
Speicheraulrüslkil aut 640 K 

Sollware lür Schneider PC 

GEM IVrile 3» - 

GEM Grsoh 3M 

GEM Business Lißrflry H9 
GEM Diary ug - 

GEM Foul EOilOi 3M 

Slar WrHEi PC 29« - 

Junior Mullipüii 399- 

Juricr'.Vord 399- 

Iliho Wo« 112 - 

(nt* Drt*»ac 2Ä 

lurbo fcüilor P76- 

Turtw Pascal flüB7 *37 

Tudo Pascal BCO 476. 

TliDo Pi »log 39B. 

SidciicJr 259,- 

VC 30 BWHz 49 

MB- 


Supersoftware 
für Ihren CPC 


1512 und kompatible: 
Gern Word Chart 
GEM Dia« 

GEM O'ivcre Fack 
GEM PiogrammErs foolM 
Small C & Small Tcofc 

- Junior WciflSlar imt Malm 
JuWdBAMH 

PlOlftl PC 

lulio Pascal 3 □ ‘6 BH 
Tune Graph* 

- Iuidg Game*Q‘l& 

Turöc Pascal Mfi? BCO 
Reflex 

lurtw Ligfurmg 
9G87-CcD'07K5ai 


Schneider CPC 6128 keytraard (mit Floppy) 

Schneider Grunmomlor 3T-65 
(für alle CPC) Sonderpreis 298.— 

Schneider Faihmoraliji CTM 644 (lür alle CPC) 798,— 
Schneider CPC 6120 mii Grunmonilor 948. - 

Schneider CPC 6128 mit Farbmonitor 1998,— 

Schneider 3 Zoll FlouwDisk 

DDi 1 solange Vorrat 490- 

Vortex 5 25 Zoll Floppy Disk F1 S Smlachsöl ni.Canli. 998. 

Vdftex 525 Zoll FloppyDisk F-1 D Doppelstaliori rn Contrt498. 

Vota 525 Zoll Floppy Disk Ft Z En,‘achsial oContr, 698, 

NEU Vota M1 S 35 Zoll Einlachslalion 

708 KD mil Conh, 998. 

NEU Vorteil M i D 3.5 Zoll Dopcslslal on 

14 MB mil Coillr. 1490- 

NEU Von« MI X 35 Zoll ZwePlaulwerk 750- 

NEU Vonex FI X 5 25 Zoll Zweillaulwerk 750- 

NEU WMex MI XRS 35 Zoll Zwilaulwerk 

mil RS 232 858, 

NEU Vertex Fl XRS 525 Zoll Zweiftauftverk 

mit RS 232 858- 

NEU Vonex M1 Z 35 Zoll Einlachslalion 

ohne Controller 628,- 

NEU Vortex WD 2000 35 Zoll Wincheste rstalion 

20 MB 2198,— 

Cumana 3 Zoll Zweillaulwerk ohns Conlrolter 398.— 

Cumana 5 25 Zoll ZweJIsulwerk ohne Controller 590- 

Achlmigi Bille geben Sie uns unbedingl Ihren Computertyp an, 

Sie ersparen sich und uns unnötige Rückfragen! 1 

Wichtiges Zubehör 
für Ihren CPC 


3 Zoll Disketten Panasonic I Maxell CF 2 5 Stück 
at 10 Stück iE 950 ab 100 Slück ie 

35 Zoll Diskelten Fuji 1 DO 10 Stück 

35 Zoll Disketten FuJ 2 DD 135 Ipi 10 Stück 
5.25 Zoll Diskellen DSI DD Fu|i 10 Slück 

Newell MP-2 lür die Schneider CPC 664/612B 
Vortex VHP Modulator lür gestochene und 
scharte Bilder 

RAM Erwciioningen de' Fa vor!« erhebliche 
Preissenkung. 1 a Qualität 
RAM Erweiterung SP-256 
RAM Erweiterung SP 512 
Oilte immer Compulerlyp angehen 
RAM Eraeitemngssalz um 256 KByte 
Bildschlfdililler lür GT 64165 
Bildschnmlilla lür Farbmonitor CTM 644 
Monitor DtehluH, 

Neigungswinkel slulenkrs einstellbar 
Wirlängeiungskabel 15 Meter lür CPC 464 
dito lür CPC 66416120 

Slaubschutzhaulxin aus weichem Künstelei 
(Schneidergrau) 

für KeytioarC 464/664/6120, NLO 401, DD11 
Monitor GiürilFarbe 
Schulzliaubeu lür Vertex 
F1S/F-1D, Fl XIMIX je 

Drucker Panasonic 1080/9051/92 DMP 2000 ie 

Schulzhaube Rauchglas lur Konsole 
CPC 464/664/6128 je 

RS 232 C serielle Schnittstelle CPC 464/664 
Akustikkoppler Dataphon S 21 d 
AMX Maus, mii Software und Handbuch 
Fotmularttaktor zu Druckei NLO 401 
Joystick Quiekst,ul li mit Auiolue 
Compelition Pro 5000 mit Miktoschaller 
Joystick-Adapter /um Anschluß /on 2 Stock Joysticks 
Diskehenbox 40 Sl 3 bnv. 3 5 Zoll Disketten 
1 a Qualität 

wie oben, jedoch 10; 40 St 5.25 Zoll Disketten 
Dskebcnwix lür WO Sl 525 Zoll Diskehen 
mil Schloß 


49, 

050- 

69.69 

79.59 

39,95 

159, 

290- 


230- 

390- 

90- 

58- 

50- 

3995 

29,95 

3495 


H 17,95 


dto in gleicher Ausführung lür den CPC 6128 
Bausalte aui Anlrage 

Software aul 3 Zoll Diskatlc, Aufpreis 

Software aul 525 Zoll Diskette Aulpteis 
EDrom Karte 264 lur den Schneider CPC 464,664 
Partlggeräl 

Eprom Karle lür den Schneider CPC 6128 
Fertigge'äl 

Bausate aul Anfrage 

Software aul 3 Zoll Diskelle, Aufpreis 

Software aul 525 Zoll Oiskelle. Aufpreis 


Turbo Pascal m Grafik 

285- 

Turbo Pascal u Gr 

225, 

Slar-Wrller 


190- 

Prollrrat 

99,- 

Ciealor Slar 

siehe 

49,90 

Dalamat 

99,- 

Slar Mon 

auch 

«90 

lexlomal 

99,- 

Mali» Slar 

Anzeige 

79.90 

PiOli ffeintei 

99- 

Oisksod Slar 

Slar 

4990 

Budget Manager 

99.- 

OaleiSlar 

Oivision98,- 

Malhemal 

99, 

Slalislic Slar 


79.90 

Copy Star II 

39.90 

Composer-Slar 


96- 

Rbu Star Plus 

298.- 

Stsn u c! Zauberslab 

39.90 

Pyramide 

3990 

Star Games 1 


3390 

Puzzle 

39,90 

Designer Star 


39,90 

Turbo Tulor 

99, 

Turbo Tcolbox 


220- 

Turbo Graphics Toolbcx 

225- 

Pascal MT+ 


169- 

Turbo Lader Business 

140- 

Small C 


140- 

C Basic Compiler 

169.— 

Star Texler 


85- 

Star Dato 

85.- 

Para 


56- 

CPC Assembler Kurs Kass64- 

dito Diskette 


75. 

Multiplan 

199- 

DR GRAPH 


199,— 

dBase II 

199 — 

DR DRAW 


199,- 

WcrOStar 

199 

Graphic Mssiei 


69.— 

Mica CAD Programm 

198- 

Turbo Aoress 


149,- 




19,95 

19.95 

2495 

140- 

249- 

278, 

69.95 

17.95 

39.95 
2495 

3995 

49.95 

3495 


Epromer lür den Schneider CPC 464/664 Fertiggeral 29050 


319.50 

15,— 

5- 

249.50 

259.50 

15,- 
5, 

Alle Gerate mit FTZ und deutschem Handbuch technische 
Unledagen jo Geiäl gegen ISO DM in ßnelmarten 
Express-.orsand speziell in die Sch.vei7 und nach Österreich, ein 
ächsle Abwicklung der Saaftung Besucten Sie uns mal in Ra 
vensbutg. luielomsche Anmeldung unerläßlich! 
Versandbedingung innerhalb der 3RQ per Nachnahme /u/ug 
lieb Podo 

Gcschallaeilcn: Monlag bis Freitag von 900 12 00 und von 

14.00 1800 Mitlwochnachmilag oeschlossen! 

SamslagROO 13.00 kein langer Samstag 
Sie linden uns im Schuhhaus Mayer im 2 Stock 

Bachstr. 52, D-7980 Ravensburg, 
Telefon 0751 / 26 138 


weitere Piogiamme linden Sie n unsere' Sullware Liste CPC, die 
wir Ihnen gerne zusenrten, Gebühr 150 DM in Briefmarken 

Rund um den Joyce 

Schneider PCW 8256 Joyce 1640 

Schneider PCW 8512 Joyce plus 

mil 2 Laulwerk 1 MB 2298, 

3 Zoll Disketten CF 2 DD 

lür Zweldajlwerk Joyce 6 Slück 90- 

FD 2 (2 Laufwerk lür Joyce 1 MB) 698, 

RAM Erweilenmgssatz um 256 KByte 140- 

Bildschirmliller lür Joyce I Joyce plus 89, 

Parallel und serielle Sclmiltslelle 148. 

Farbband lür Drucket Juyce 2495 

Gralpad 3 professionelles CAD System lür 
Joyce PCW 8256 und PCW 6512 kampleit mit Software 
und Handbuch 549, 

Joyce Schrefo-Praxis Pake! siehe DMV Vedag 89. 

Mica CAD Programm 

Joyce 190- 

dBase II 139— 

Vereinsverwallung Joyce 240— 

Wordstar 199. 

Turbo Adiess Joyce 149, 

Muliplan 199, 

Uirbo Pascal ohne Gralik 225, 

OR GRAPH 199, 

FIBU Slar Plus 290, 

DR DRAW 199. 

Joyce Mailing System 189- 

Sfir-Mail V 20 90- 

Datei Slar 90- 

Star Base 198,- 

BusinessSlar 290 

Slatislic Slar 98. 

AullragsBeaibeihing 444- 

Adressverwallung 128,- 

Joyce lür Einsteiger 29.— 

Das große Joyce Buch 59,- 

Schachprograrrrri 3D Clock Chess 69,95 

we iiete Programme linden Sie in unserer Liste Jcw ? dis wir Ihnen 
gerne /usenüen, Gebühr 150 in Brielmarken 

Druckerparade 

Epson LX 80 WO Zeichen / Sekunde 898. 

Epson FX 800 240 Zeichen / Sekunde 1248, 

Epson FX-1000 240 Zeichen / Sekunde Breil 1698 

Epson LC- 800 200 Zeichen r Sekunde 24 Nadeln 1690- 
Eosor L01000 300 Ze ichen) Sekunde 24 Nade In 2190- 
Eoson LO 2500 320 Zeichen / Sek 24 Nadeln Breil 2690,- 
Epson EXßDO 300 Zeichen / Sekunde 1396- 

Eoson EX 1000 300 Zeichen I Sekunde Breil 1790- 

Cdoui Einbau Sei lür EX 600 (1000 229.— 

Panasonic 1080 100 Zeichen / Sekunde 598,— 

Panasonic 1091 120 Zeichen / Sekunde 790 

Panasonic 1992 180 Zeichen / Sekunde 1098, 

Panasonic 1592 180 Zeichen / Sekunde Breil 1598, 

Panasonic 1596 240 Zeichen / Sekunde Bieii 1998 — 

Panasonic 3151 Typenraddrucker 13SB. 

NEC P 60 200Zeichen (Sekunde absolute Spitze 1598, 

NEC F 6 Color 200 Zeichen I Sekunde Breit 1998 — 

NEC P 7 200 Zeichen /Sekunde Breil 2198 

SüiNLIU UOZitlwi/Sekunde nu *sfiöeGer,iBl9a- 
Star NG 10 120 Zeichen I Sekunde 898, 

Stai SC 15 120 Zeichen / Sekunde Brett 

Emzeiblalteiwug NI.KI/NG10 


Schneider DMP 2000 
Riteman F+ 105 Zeichen / Sekunde 
DrucKeranschluHkabel CPC 4641364 
oia CPC 6128 hochwertiges Rjndkabei geschirmt 
Druckerslander, 1 a üualiläl Multiform 
Endlospapier weiß Mikiopedoralion 300 ßlall 
d»B 1000 Blall 

2000 Blatt 


748. 

269, 

670- 

690— 

4995 

59.95 
90- 

19.95 
3495 

49.95 


Ersatdarbbänder lur alle Drucker ab Lager lielerhai. 

Alle Gerald mil FTZ und deutschem Handbuch Technische 

Unterlagen je Gttral gegen 150 OM in Bnelmaiken 

Exprsssversand sge/iell in die Schweiz und nach Österreich. 

einfachste Abwicklung aer Bezahlung 

Besuchen Sie uns mal in Ravensburg, tela/O'i sehe Anmeldung 

uneilafilich! 

Versandbedingung innerhalb der BRD: 

per Nachnahme zuzüglich Pudo 

Geschältszeiteit Munlag bis Fieilag von 900 - 1200 und vm 1400 

-1800 Miftwachoachmiltag geschlossen! 

Samstag 800 -1300 kein langer Samslag 
Sie linden uns im Schuhhacs Mayer Im 2 Stock 
Bachstr. 52, D-7980 Ravensburg, 
Telefon 0751 / 26 138 


E schauties W 
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I—CAL 


2410 CLS#0:n=0 (3093 

2420 PRINTin,"Kopfrechnen [17643 

2430 PRINTin,"-" [13993 

2440 INPUTiO,"Anzahl der Aufgaben : ",an C27673 

z 

2450 DIM num(anz),zel*(anz),ope(anz),erg(a [19363 
nz),rest(anz) 

2460 PR INT#n [5773 

2470 FOR i = 1 TO anz [8563 

2480 ’ auf gaben bilden (s. Unterprogramm): [20923 


2490 GOSUB 2900 
2500 wdh=0 

2510 ' aufgaben auf listen und auf den schi 
rm schreiben: 

2520 L0CATE#0,5,i+6 

2530 PR 3 NTin,TAB(5)US ING" # #";i; :PRINTin, 

> ";num(i);zei*(i) ; 

2540 PRINTin,US ING"###";ope(i); 

2550 PR1NT#n,TAB<19)"= "; :PR INT#n,US ING"# 

##";er g < i ) ; 

2560 IF rest <i)=0 THEN PR INTin ELSE PRINT# 
n,” R.";rest( i) 

2570 NEXT 

2580 PRlNT#n:PRINTin 

2590 * arbeitsblatt bzw. kontro11b1att aus 
drucken: 

2600 GOSUB 3200 

2610 i*=L0WER*(INKEY*):IF i*="a"0R i*="k"T 
HEN 2630 ELSE IF i*="n" THEN RUN 2400 
2620 GOTO 2610 

2630 PRINT#8,CHR*<27);"M";CHR*(27);"1";CHR 
$(15):n=8 

2640 IF i*="k" THEN 2680 

2650 PRINTin,TAB(5)"K OPFRECHNEN 
: * NAME:": 

2660 PRINTin,TAB(5)STRING*(23,"-");STR ING* 
dl," ") ;STR1NG$ (38, "-") 

2670 PR INTin,TAB(5)STR1NG$(73," = "):G0T0 27 
10 

2680 PR 1NTin,TAB(5)"K OPFRECHNEN 
« " ; 

2690 PRINTin," LEHRER-KONTROL 
L B L A T T" 

2700 PR!NTin,TAB(5)STRING$(73," = ") 

2710 PR 1NTin:PR INTin 
2720 FOR i=1 TO anz 

2730 PR 1NTin,TAB(5)US ING"##";i;:PRlNT#n, 

) ";num(i);zei$(i); 

2740 PRINT#n,USlNG"###";ope(i) ; 

2750 PRlNT#n,TAB(19)”= 

2760 IF i* = "k" THEN PRINT#n,USING"###";erg 
(i); ELSE PR INTin,STR ING$(8, "_") 

2770 IF i $ = "k” THEN IF rest(i)=0 THEN PR1N 
Tin ELSE PR[NTin,” R.";rest(i) 

2780 PR 1NTin 
2790 NEXT 

2800 PR1NTin,TAB(5)STRING*(73,"=") 

2810 IF l*="k"THEN 2840 

2820 PRINTin,TAB(5)" * Von den"anz"Auf gab 

en auf diesem Blatt wurden _ richtig ger 

echnet *" 

2830 PRINTin,TAB(5)STR ING*(73," = ") 

2840 PRINT#8:PR1NT#8 
2850 IF i*="a"THEN ab=ab+l 
2860 IF i*="k"THEN kb=kb+l 
2870 GOTO 2600 

2880 ’ UNTERPROGRAMM: aufgaben bilden 
2890 ’ - erste zahl finden: 

2900 num(i)=!NT(RND(TlME>*100) 

2910 * - rechenart bestimmen: 

2920 IF num(i> >10 AND num(i)<20 THEN zei* 
( i ) =".":G0T0 2980 

2930 IF num(i> >20 AND num(i)<40 THEN zei* 
(i)=« + »:GOTO 3000 

2940 IF num(i)>40 AND num(i)<60 THEN zei* 
( i )=":":GOTO 3020 

2950 IF num (i) >60 AND numdXlOO THEN zei* 
( i )="-":GOTO 3050 
2960 GOTO 2900 

2970 ’ - zweite zahl finden, ergebnis erre 
chnen und brauchbarke1t pruefen: 

2980 ope < i ) = I NT (RND (TI ME)* 10) : IF ope(i)<4 
THEN 2980 

2990 erg(i)=num(i)*ope(i):rest(i)=O:G0TQ 3 
080 

3000 ope(i) = I NT(RND(TI ME)* 100):IF ope(i)>7 


(9031 

[4913 

[23113 

[949 3 
[40693 

C 2352 3 
[35473 

[36943 

[3503 

(11293 

(34363 

(9533 

[33093 

[3453 

[21773 

[9603 

[32793 

(40343 

C33463 

(31953 

(34143 

[25813 
(11293 
[8563 
(40693 

(23523 

(15453 

[38263 

(27443 

(5773 
[350 3 
(25813 
[8323 
(87823 


(25813 
[13143 
C 754 3 
[13743 
[339 3 
(20213 
[14133 
[16313 
[17483 
[19723 

(29823 

£30343 

{17893 

[3913 
[41973 

[29583 

[37563 

[34053 


0 THEN 3000 

3010 erg< i)= num(i)+ope<i>:rest(i)=0:GOTO 3 
080 

3020 ope(i)=INT(RND(TIME)»10):IF ope(i)<4 
THEN 3020 

3030 erg(i)=FIX(num(i)/ope(i>):IF erg(i)>9 
THEN 3020 

3040 rest(1)=num<i)-(erg<I)»ope(i)):GOTO 3 
080 

3050 ope<i)=INT(RND(TIME)*100):IF ope(i)<l 
0 OR ope(i)>60 THEN 3050 
3060 erg(i)=num(i>-ope(i):restli)=0 
3070 ’ - jede reihe soll nach moeglichkeit 
ein anderes rechenzeichen haben: 

3080 IF zei*(i)=zei*(i-l> AND wdh<3 THEN w 
dh=wdh+1:GOTO 2900 

3090 ’ - reine zehnerzahlen und 0 sollen a 
Is operatoren ausscheiden: 

3100 FOR c=0 TO 9:1F ope(i)=10*c THEN 2920 


[42523 

[27913 

(34593 

(28163 

[40513 

[24143 

[30511 

(34693 

(33003 

( 1B373 


3110 NEXT 

3120 ’ - alle vier rechenarten sollen anna 
ehernd gleich oft Vorkommen: 

3130 ant=anz\4+l 

3140 IF zei*(1)="." THEN zmu1=zmu1+1:1F zm 
ul>ant THEN 2900 

3150 IF zei*(i)="+" THEN zadd = zadd +1: I F za 
dd>ant THEN 2900 

3160 IF zei*(i)=":" THEN zdiv = zd i v + 1:IF zd 
iv>ant THEN 2900 

3170 IF zei*(i)="-" THEN zsub = zsub+1 : 1F zs 
ub>ant THEN 2900 
3180 RETURN 

3190 • UNTERPROGRAMM: druck-menue-anzeige 


[350 3 
[74153 

[792 3 
[24863 

[26713 

(17293 

C17963 

[555 3 
(24123 


3200 WINDOU#1,38,78,2,7:CLS#1 [12553 

3210 PR I NT#1,CHR*(24);" ";STR 1NG*(38,"*") ; (27033 

3220 PRINTil," * <A>-Arbeitsb1att-Ausdruck C37093 
Nr."ab"!";TAB(39)"# " 

3230 PRINTil," * <K>-KontroIlb1att-Ausdruc (47703 
k Nr."kb"!";TAB(39>"# " 

3240 PRINTil," * <N>-Neustart mit anderen [46173 
Aufgaben!"jTAB(39)"# " 

3250 PRINTil," STR ING*(38,"*");" ";CHR*( (20883 
24) 

3260 RETURN C5553 

3270 » =================================== [39363 


3280 » 
3290 ’ 

VARIABLEN 

-LISTE: 

sum : 

summand 

3300 ’ 

3310 ’ 

sub : 

subtrah 

3320 ’ 

mu I : 

mu1tip1 

3330 ’ 

d i v : 

divisor 

3340 * 

num : 

erste z 

3350 * 

zei * : 

rechenz 

3360 ’ 

ope : 

zweite 

3370 ’ 

erg : 

er gebni 

3380 ’ 

rest : 

ganzzah 

ivision 


3390 ' 

res : 

er gebni 

h sortiert 


3400 ’ 

zres : 

zahl de 

ergebn i sse 


3410 » 

zadd : 

zahl de 

3420 * 

zsub : 

zahl de 

3430 ’ 

zmu 1 : 

zahl de 


end 

[871) 
[874 3 
[7303 
[12453 

ikator 

(11493 

ahl einer aufgabe 

(11133 
[10723 

e i chen 

[12913 

zahl einer aufgabe 

(9113 

s 

C6593 

liger rest einer d 

[22503 

s, der groesse nac 

[23943 

r zu sortierenden 

[36373 

r additionen 

[25983 

r Subtraktionen 

[23983 

r multiplIkationen 

[29533 


3440 ’ zdiv : zahl der dlvisionen 

3450 ’ anz : anzahl der köpfrechen-auf 

gaben 


3460 ’ ant : anteiI der köpfrechen-auf 
gaben mit demselben zei* 

3470 ' wdh : zahl der versuche, eine a 

ufgabe mit anderem zei* zu finden 

3480 ’ ab : zahl der arbeitsb1att-aus 

drucke 

3490 * kb : zahl der kontro1IbIatt-au 


sdrucke 

3500 ’ n : ausgabe-geraet (n=0 

rm; n=8: drucker) 

3510 ’ i*,in* : inkey*-eingaben zur 
ammSteuerung 


3520 ’ tb 
3530 ’ a,c,g,i 
3540 ’ j,q,z 


tabu 1atorste 1 le 


sch i 
progr 


(25713 

(28353 

(46903 

(20793 

[29053 

[28673 

C33613 

(35323 

(1576 3 
[9993 
[17463 
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zaehl-variablen 







Schneider CPC 

Arbeiten 
mit Turbo Pascal 


Arthur Naiman 
Schneider CPC-Einführung in Wordstar 

Der Bestseller zum populärsten Textverarbeitungsprogramm wurde für die Besitzer 
des CPC überarbeitet. Und damit wichtige Hilfe und Nachschlagewerk bei der Arbeit 
mit Wordstar und Mail-Merge auf dem CPC. Neben der klaren Einführung in den 
effektiven Umgang mit Wordstar gibt es u. a. auch wertvolle Hinweise für die Instal¬ 
lation von Druckern und zu Systempatches. 
280 Seiten /ca. 40 Abb. ISBN 3-88745-646-7 (1986) 
Best.-Nr. 3646 DM42.-/sFr. 38,60/S 328.- 


/\ 

TSYBEX 

v> 


Schneider CPC 

Erfolg mit Muttiplan 



Michael A. Beisecker 
Schneider CPC -Arb eiten mit dBA SE H 

dB ASCII ist im PC-Bereich wohl eines der leistungsstarksten Datenbankprogramme. 
Benutzern eines Schneider CPC vermittelt ein echter Experte in diesem Buch 
alle Kenntnisse, die für den erfolgreichen Einsatz von dBASEII wichtig sind, z. B. 

Installation von und Programmieren mit dBASEII, Editieren von Dateien mit 
Wordstar, Tips und Tricks. Jeder Lernschritt wird durch praxisgerechte Beispiele 
ergänzt. Und zwar so, daß dem Leser die Umsetzung dann wirklich problemlos 
möglich ist. Ein Buch, das in jeder Arbeitsphase weiterhilft. 
272 Seiten / mit Abb. ISBN 3-88745-660-2 (1986) 
Best.-Nr. 3660 DM48,-/sFr. 44,20/S374- 


Kerl-Hermann Bo/Ike 

Schneider CPC - Arbeiten mit Turbo Pascal 

Der Bestseller. Das Turbo Pascal Buch" wurde speziell für Besitzer eines Schneider 
CPC überarbeitet. So ermöglicht es den optimalen Einsatz der leistungsfähigen 
Programmiersprache - auf die CPC-Arbeits- und Systemumgebung zugeschnitten 
und durch zusätzliche Informationen ergänzt. Zahlreiche Beispiele veranschaulichen 
die vorgestellten Programmierkonzepte. Übungen zu jedem Kapitel machen dieses 
leicht verständlich geschriebene Buch auch für Einsteiger zur unentbehrlichen 
Arbeitshilfe. 

296 Seiten /mit Abb. ISBN 3-88745-649-1 (1986) 

Best. -Nr. 3649 DM 48,-/sFr. 44.20/S 374,- 


Schneider CPC 

Einführung in 
Wordstar 



Thorsten Ritter 

Schneider CPC - Erfolg mit Multiplen 

Ein didaktisch hervorragendes Lehrbuch und Nachschlagewerk für CPC-Besitzer, die 
das Tabellenkalkulationsprogramm Multi plan an wenden wollen. Das Buch ist die 
überarbeitete, auf den CPC zugeschnittene Version des Bestsellers .Erfolg mit Multi¬ 
plan " und führt Schritt für Schritt in das Programm ein. An konkreten Beispielen 
wird erklärt, welchen Nutzen CPC-Besitzer mit Multiplan in der Praxis haben. 

200 Seiten /ca. 45 Abb. ISBN 3-88745-6394 (1986) 

Best.-Nr. 3639 DM48,- / sFr. 44,20/S374- 


/V 

TSYBEX 


Schneider CPC 

Arbeiten mit 
dBASE II 



Michod A Bciicdur 


NEU 


Das 

Schneider CK 


Systembuch 



Günter Woigk 

Das Schneider CPC Systembuch 


Erfahren Sie jetzt alles Wissenswerte über das Innenleben Ihres Schneider CPC 464, 

664 oder 6128. Der Autor verrät Ihnen alle Interna Ihres Rechners und deren Nut¬ 
zen für Ihre Anwendung. Aus dem Inhalt: Programmierstil und Programmelemente; 
die Feinheiten des Locomotive BASIC; Überblick über den Z80-Assembler-, Maschi¬ 
nensprache auf dem CPC; die Firmware in- und auswendig; Unterschiede und Ge¬ 
meinsamkeiten der CPC's. Das alles wird abgerundet durch viele Beispiele und Dar¬ 
stellungen sowie einen Anhang mit Grafiken. Tabellen und Verzeichnissen. Nutzen 
Sie das mit Informationen randvolle Nachschlagewerk, um das System Ihres Schnei- 4 0« 
der CPC von Grund auf zu kennen und sicher in die Programmier-Arbeit einzustei- Jh A 


gen. 

704 Seiten / mit Abb. 
Best. -Nr. 3606 


ISBN 3-88745-606-8 (1987) 
DM 58,-/sFr. 53,40/S 452, - 


In Kürze 



/,*\v 

/ 


NEU 


Günter Woigk 















j—Tips & Tricks 


Tip des Monats 
TOOLHEX 


für 464-664-6128 

I— 

Unser diesmaliger Tip des Monats basiert auf einer so ver¬ 
blüffend einfachen Idee, daß es sehr verwunderlich ist, wieso 
vorher noch niemand auf diesen Einfall gekommen ist. Es 
handelt sich um einen DATA-Generator. Ein alter Hut, wer¬ 
den Sie jetzt denken, aber dieser DATA-Generator ist anders 
als alle bisherigen. Er erzeugt nicht etwa aus einer Binärdatei 
ein BASIC-Programm, sondern hat vielmehr die Aufgabe, 
das lästige Abtippen von endlosen DATA-Blöcken zu erleich¬ 


tern. Das Programm arbeitet voll Menue- und Window¬ 
gesteuert und erklärt sich während des Arbeitens von selbst. 
Sie können die Größe einer Zeile festlegen, sich Checksum¬ 
men ausgeben lassen, festlegen, ob Sie HEX- oder DEZ- 
Zahlen wollen; der Computer ist gegen Falscheingaben ge¬ 
sperrt, Zeilennummem werden automatisch gesetzt und das 
lästige Suchen nach der Kommataste gehört der Vergangen¬ 
heit an. Wenn Sie Ihre Datei erstellt haben, können Sie zei¬ 
lenweise auf und ab blättern und nachträgliche Änderungen 
vornehmen. Wenn Sie der Meinung sind, daß alles in Ord¬ 
nung ist, können Sie die Datei abspeichern und als norma¬ 
len DATA-Lader benutzen. Das heißt aber noch nicht, daß 
alte Dateien nicht nachbearbeitet werden können, dies geht 
nämlich auch, und zwar um einiges besser als mit dem Edi¬ 
tor des Amsdos. Die Redaktion war der Meinung, wenn ei¬ 
nem so viel Gutes wird beschert, das ist einen »Tip des Mo¬ 
nats« wert. 

(U. Nichtern/TM) 



10 ’ ##»**«####»#««***#»#**#**»*#*####*# C.1460] 
20 **####«*##*#*»***## HEX-TOOL «*«»«** [15043 
30 '#*#«###*##**»«**####*#«**#**###»### [14603 
40 ***** COPYR.BY ULRICH NICHTERN **» [2288] 
50 ’***#**«*###*«# RHEINSTRASSE 128 * * * [23883 
60 >*#»#***«#*»«## 6507 INGELHEIM *** [1931] 
70 [14603 
80 ’*«*««*#» EINGABE TEIL **»###*»»#»*» [17653 


90 BORDER 13:DIM datazel*(300),quersum<300 [29983 
) 

100 IF PEEK(&AF10)<>&FF THEN OPENOUT"a":ME [48723 
MORY HIMEM-1:CLOSEOUT 

110 POKE &AF10,&FF:MODE 2 [10093 

120 WIND0W#0,1,80,2,8:WIND0W#1,1,80,1,2:UI [67743 
ND0W#2, 32,80,10,14:WIND0W#3, 1,22, 12, 14:WIN 
D0W#4, 1,48, 16,25:WIND0W#5,1,22,10,11:WINDO 
Wt6,52,80,16,25 

130 PRINT#1," "+STRING*(26," ")+"TOOLHEX " [56311 
♦ CHR* <164> + " BY ULRICH NICHTERN"+STR1NG*(2 
6 ," ")+" " 

140 KEY DEF 10,O,55,6S:KEY DEF 11,0,56,66: [59263 
KEY DEF 3,0,57,67:KEY DEF 20,0,52,68:KEY D 
EF 12,0,53,69:KEY DEF 4,0,54,70 

150 PLOT 0,264:DRAW 639,264:PL0T 0,168:DRA [71073 
W 639,168:PLOT 176,264:DRAW 176,168:PL0T 1 
77,264:DRAW 177,168:PL0T 384,168:DRAW 384, 

0:PLOT 385,168:DRAW 385,0 

160 PRINT#2,"Bitte alle Fragen mit <J> ade [73243 

r <N> beantworten !! (event.Zahlen eingebe 

n)" 

170 PR I NT:PR INT"Moechten Sie eine bestehen [77583 
de Datei bearbeiten ?":GOSUB 1480 
180 IF jabfrag THEN 1110 [7183 

190 CLS:PR I NT:PR INT"Es koennen nur <HEX>-Z C45533 
ahlen verarbeitet werden !" 

200 PRINT:PRINT"Die Zahlen werden als kons [40503 
t. angesehen !" 

210 PRINT:INPUT"Aus wievielen Zahlenpaaren (98643 
besteht eine Zelle (Ohne Quersumme) ? : " 
,anzzeil:IF anzzeil=0 OR anzzeil>80 THEN 2 
10 ELSE anzzei1=anzzel1«3-1 

220 CLS:PRJNT:PRINT"I st eine Quersumme ang [48833 
egeben ? <J/N> ":GQSUB 1480 

230 IF Jabfrag THEN he Ipquer = 1:PR I NT:PR I NT (129183 
"Ist die Quersumme Dezimal (J) oder Hexade 
zimal (N) angegeben ?":GOSUB 1460:IF Jabfr 
ag THEN unterhex=l 

240 bearbzei1=1;DIM nerkerz*(anzzei1+2) [27133 

250 CLS:PR I NT:PR INT"Ohne Eingabe wird als [79463 
erste Zeilennummer 10 und als Zeilenabstan 
d 10 angenommen" 

260 PR 1 NT:lNPUT"Mit welcher Zeilennummer s [77473 
oll ich beginnen ? : ",groszei1e:IF gro 

szeile=0 THEN groszeile=10 

270 IF groszeiIe<9 THEN PR INT:PRINT" Zahl (64983 
muss groesser 8 sein ! ":FOR wzwi=l TO 200 
0:NEXT:GOTO 260 


288 PRINT:INPUT"Mit welchem Abstand soll i 
ch durchnummerieren ? : ",dlffzei1:IF diff 
zel1=0 THEN diffzeil=10 
290 CLS 

300 *#«»»»«« ZEICHENVERARBEITUNG »«««*« 

310 CLS#6:CLS#5:PR INT#5," <ZEILE> <QUE 

RS> ";:IF helpquer THEN IF unterhex=0 THEN 
PRINT#5," HEX " ELSE PRINT#5," DEZ " 

320 IF he 1pquer = 0 THEN PR INT#3:PR INT*3," 
CKEINE ANGABEN> " 

330 GOSUB 1610:wzwi=0:tatspa1t=1:spa1tmax= 
1 

340 Steuerz* = "vVuUoOkK"+CHR*(243)+CHR* <247 
)+CHR*< 242)+ CHR*(246)+ CHR*(240)+ CHR*(244) + 
CHR*(241)+CHR*(245)+"sS"+CHR*(13) 

350 zu 1eing*="1234567890ABCDEFabcdef" 

360 GOSUB 1530 

370 merkerzt(wzwi)= STR*(groszeile)+ " DATA 
":numdata=LEN<merkerz*(wzwi)):LOCATE 1,7:P 
RINT merkerz$(wzwi);:CALL kBB81 
380 L0CATE#2,28,3:PR1NT#2,"Bisher :"+STR*< 
zei1max)+ " ZEILEN" 

390 einlese*=INKEY*:IF einlese*=""THEN 390 
400 IF INSTR(zuleing*,einlese*)=0 THEN 530 
410 IF correkt AND wzwi=anzzei1 THEN PRINT 
CHR*(7);:GOTO 390 

420 !F P0S(#0) = 1 AND bearbzei 1 Ozei 1 max + 1 

THEN PRINT CHR*(7);:GOTO 390 

430 wzwi=wzwi+1:IF merkerz*(wzwi)=""THEN m 

ompos=mompQs+l 

440 IF merkerz*(wzwi)=","THEN PRINT CHR*<7 
);:PRINT”,”;:GOTO 390 ELSE merkerz*<wzwi)= 
einlese*:GOSUB 480 

450 IF merkerz*(wzwi)<>","AND merkerz*(wzw 
i-1)<>","AND NOT wzwi=1 THEN IF anzzeil=wz 
wi THEN 1000 ELSE wzwi=wzwi+1:merkerz*(wzw 
i)=",":mompos=mompos+l:GOSUB 480 
460 GOTO 390 

470 '««*##«« BILDSCHIRMAUSGABE »#»««««# 

480 IF(merkerz*(wzwi♦1)<>""AND raerkerz*<wz 
wi)=",")OR(merkerz*(wzwi+l)<> n ”AND wzwi+1= 
mompos)THEN IF correkt=0 THEN mompo3=mompo 
s-1 

490 IF POS(#0)=1 AND merkerz*(wzwi+1)*""TH 
EN tatspalt=tatspalt+1 

500 IF PQS(#0)=1 THEN spa1tmax=spa1tmax+1 

510 PRINT merkerz*(wzwi);:RETURN 

520 '*««*«#« FEHLERKORREKTUR »«*«*#»»*# 

530 xzwi=INSTR(steuerz*,einlese*):1F xzwi= 
0 THEN PRINT CHR*(7);:GOTO 390 
540 ON xzwi GOTO 750,750,640,640,690,690,7 
80,780,840,840,880,880,920,920,960,960,134 
0,1340,560 

550 *##«#**« EDIT ENDE #«*#««««»««»»«#« 

560 IF correkt=0 THEN PRINT CHR*(7);:GOTO 
390 

570 datazei*<bearbzei1)*STRING*(LEN(data 2 e 


[80273 


[913 

[13673 

(64273 


126213 
[34333 
[52423 


[30153 
[905 3 
[68913 


[36193 

[13773 
(18413 
[21253 

[39893 

[43683 

[5684 3 


[120413 


[494 3 

(21633 

(61643 


[37793 

[25853 
[17043 
[12293 
[38303 

[44883 


(11333 

(22073 

(62533 
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Tips & Tricks—| 


iKbearbza11)),CHR*(32)):yzwi*LEN(merkerz* 

(0)):MID#(datazei*(bearbzei1),i,yzwi)=aerk 
erz*(0) 

580 quersum(bearbzei1) =0:ein IeBe* = "":FOR w (148341 

zwi = l TO anzzei1:MID*(datazei*(bearbzei1), 

yzwi+wzwi , l)=merkerz#(wzwi ):1F merkerzKwz 

wi)= ","THEN quersum(bearbzei1)=quersum(bea 

rbzei 1 ) + VAL( "fc"+einlese*) :einlese*=""ELSE 

einlese*=einlese*+merkerz*(wzwi) 

590 merkerz*(wzwi)="":NEXT: IF helpquer THE [155763 
N quersum(bearbzei1)=quersum(bearbzeil ) + VA 
L("&"+einlese*):einlese*="":PR INT#3:PR 1 NT# 

3:L0CATE#3,1,2:PR INT#3,VAL(datazei•(bearbz 
eil)) ELSE quer*um(bearbzei1)=0:G0T0 610 
600 L0CATE#3, 12,2:!F unterhex THEN PRINT#3 [49613 
,quersum(bearbzei1)ELSE PRINT#3,HEX*(quere 
um(bearbzel1)> 

610 correkt=0:mompos=0:korrekt=0:proraode=0 [28613 
620 FOR wzwi = spaltmax TO tatapa11:PRINT:NE [57923 
XT:wzwi=0:spa1tmax*litatspalt=l:G0T0 650 
630 ******** NACH UNTEN BLAETTERN «»»*« (14011 

640 IF bearbzei1=0 OR POS(#0)>numdata OR t 147831 
atspa1t>1 THEN PRINT CHR*(7);:GOTO 390 
650 IF bearbzeil=zeilmax THEN PRINT CHR*(7 (72913 
);CHR*(7) ; :bearbzei1=bearbzei1+1:promode*0 
:GOTO 360 

660 tatspa1t=1:wzwi=0:mompos a O:spa1tmax=l [16361 
670 bearbzei1=bearbzeiI+1;GOSUB 1550:GOTQ [11341 

390 

680 ******** NACH OBEN BLAETTERN ****** [13781 

690 IF correkt THEN PRINT CHR#(7);:GOTO 39 E24251 
0 

700 IF wzwi>0 OR bearbzei1=1 THEN PRINT CH [23661 
R*(7);:GOTO 390 

710 IF bearbzeil=zeilmax+1 THEN PRINT [21883 

720 FOR wzwi=0 TO rnompos:merkerz*(wzwi)="" [68261 
:NEXT:tatspalt=l:wzwi=0:mompoa=0:spaItmax= 

1 

730 bearbzei I=bearbzei 1-1: IF korrektOl TH [36901 
EN GOSUB 1550:GOTO 390 ELSE 790 

740 '»«*»*«« LETZTE ZEILE EDITIEREN **» [7503 

750 IF bearbzei lOzei lmax + 1 THEN PRINT CHR [25661 
*(7);:GOTO 390 

760 korrekt=l:GOTO 690 [11961 

770 ******** AKT. ZEILE EDITIEREN ***** [28553 

780 !F P0S(#0)<>1 THEN PRINT CHR#(7);:GOTO [22223 
390 

790 GOSUB 1590:correkt=l E21491 

800 yzwi=1NSTR(datazei$(bearbzeil),"DATA") [96323 
+4:merkerz*(Q)=LEFT*(datazei*(bearbzei1),y 
zwi);PR INT merkerz#(0);:xzwi=LEN(datazei*( 
bearbzei1)) 

810 FOR wzwi=l TO xzwi-yzwi:merkerz#(wzwi) [67083 
=MID*(datazei*(bearbzeil),wzwi+yzwi,1):GOS 
UB 480:NEXT 

820 mompos=xzwi-yzwi-1:wzwi*wzwi-2:LOCATE [41831 
POS(#0 >-1,7:GOTO 390 

830 ******** CURSOR RECHTS ************ [8563 

840 IF mompos<wzwi+1 THEN PRINT CHR*(7);:G [17133 
OTO 390 

650 PRINT CHR*(9);:wzwi=wzwi+l:IF P0S(#O)= [43161 
1 THEN spa1tmax=spa1tmax+1 

860 IF merkerz#(wzwi + 1) = ", " THEN 850 ELSE E14963 
390 

870 ’ ##**»** CURSOR LINKS ************* [14703 

880 IF wzwi<=0 THEN PRINT CHR*(7);:GOTO 39 [17653 
0 

890 PRINT CHR#(8);:wzwi=wzwi-i:IF P0S(#0>= [45871 
80 THEN spa1tmax=spa1tmax-1 

900 IF merkerz*(wzwi + 1) = n , " THEN 890 ELSE [20911 
390 

910 ******** CURSOR HOCH »o*»##**»***« [13871 

920 1F( spa 1 tmaxOl AND POS ( #0) >numdata)OR ( [84703 
spaltmaxOl AND spa I tmax<>2) THEN PRINT CHR 
*(11);:wzwi=wzwi-80:spaltmax=spa1tmax-1:GQ 
TO 940 

930 PRINT CHR#(7>; [11753 

940 GOTO 390 [4941 

950 ******** CURSOR RUNTER ************ [12323 

960 IF wzwi+80>anzzei1+1 THEN PRINT CHR*(7 [25993 
);:GOTO 390 

970 IF(spaltmax<tatspalt AND merkerz*(wzwi [74143 
+80)<>"")THEN PRINT CHR*(10);:wzwi=wzwi+80 
:spaltmax=spaltmax+1:GOTO 390 
980 PRINT CHR*(7);:GOTO 390 [14443 

990 ******** NAECHSTE DATA ZEILE ****** [10733 


1000 IF correkt THEN 560 ELSE PRINT:CALL fc 
BB84:mompos*0:spaltmax=1 

1010 SOUND 1,80,20,12:bearbzei1=bearbzei1+ 

1:ze11max=zeilmax+1:datazei*(ze11max)=STRI 
NG*(wzwi+numdata,CHR*(32)):yzwi=LEN(merker 
z#(0)):MID*(datazei*(zeilmax),i,yzwi)=merk 
erz*(0) 

1020 einlese**"" tPRINT.'FOR xzwi*l TO wzwi: 

MID*(datazei*(zeiImax),yzwi+xzwi,l)=merker 
z#(xzwi) 

1030 IF merkerz*(xzwi)= ","THEN quersumtzei 
lmax) =quersum(zei Imax ) +VAL( "8<" + einlese#) :e 
inlese*=""ELSE einlese*=einlese*+merkerz#( 
xzwi) 

1040 merkerz*(xzwi)= "":NEXT:tatspalt=l:wzw 
i* 0 :groszei1e=groszei1e+diffzei 1 
1050 quersum(zel1max)=quersum(zeiImax)+VAL 
("&"+einIese*):ein1ese# 5 "":1F helpquer=0 T 
HEN quersumtzeilmax)=0 

1060 IF helpquer THEN PRINT#3:PRINT#3:LOCA 
TE#3,1,2:PR I NT#3,VAL(datazei*(zeiImax)) 

1070 IF helpquer THEN L0CATE#3,12,2:IF unt 
erhex THEN PRINT#3,quersum(zeiImax)ELSE PR 
I NT#3,HEX*(quersum(zeilmax)) 

1080 IF zei1max=290 THEN PRINT#2," SIE SOL 
LTEN ZUISCHENABSPEICHERN, sonst koente es 
zu einem Ueberlauf kommen I " 

1090 GOTO 370 

1100 ******* DATEI EINLADEN *********** 

1110 WINDOW SWAP 0,4 

1120 einlese*="":CLS#2:INPUT#2," Welche D 
atei soll geladen werden <NAME>.HEX : ",ei 
niese* 

1130 OPEN 1N"" + ein 1ese# + ".hex" 

1140 WH ILE NOT EOF 

1150 LINE INPUT#9,abspeich*:IF INSTR(abspe 
ich*,"DATA")=0 THEN 1190 

1160 IF promode=0 THEN promode=1:GOSUB 125 
O 

1170 zeilmax=zeiIraax+1:IF helpquer=0 THEN 
datazei*(zei1max)=abspeich*:GOTO 1190 
1180 xzwi=LEN(abspeich*):yzwl=lNSTR(abspei 
ch*,"DATA"):yzwi = INSTR(yzwi+6,abspeich*, " 
"):datazei#(zeilmax)=LEFT*(abspeich#,yzwi- 
2):IF unterhex THEN quersum(zeilmax)=VAL(R 
IGHT*(abspeich*,xzwi-yzwi))ELSE quersum(ze 
i1max)=VAL("&"+RIGHT*(abspeich*,xzwi-yzwi) 

) 

1190 WEND:promode=0:CLOSEIN 

1200 WINDOW SWAP 0,4:CLS#2:CLS:xzwi=zeiIma 

x-7:IF xzwi<=0 THEN xzwi*l 

1210 groszeile=VAL(datazei*(zeilmax>):momp 

os=VAL(datazei*(zeilmax-1)):diffzeil=grosz 
eile-mompos 

1220 bearbzeiI=zeilmax+1:D1M merkerz#(anzz 
ei I+2):CLS:FOR wzwi = xzwi TO zeiImax:PRINT 
datazei*(wzwi):IF helpquer THEN PRJNT#3:L0 
CATE#3,1,2:PRINT#3,VAL(datazei#(wzwi)):LOC 
ATE#3,12,2:IF unterhex THEN PRINT#3,quersu 
m(wzwi)ELSE PR INT#3,HEX*(quersum(wzwi)) 
1230 NEXT:morapos=0:tatspa11=0:wzwi=0:PR INT 
:groszeile=groszei1e+di 1t zei1:GOTO 310 
1240 ’»*# EINLADEN UNTERPROGRAMM #»«»«# 
1250 xzwi=LEN(abspeich*):yzwi=INSTR(abspei 
ch*,"DATA"):yzwi*INSTR(yzwi+6,abspeich#,", 
"):!F yzwiOO THEN helpquer = l 
1260 yzwi=0:FOR wzwi=i TO 90:yzwi=INSTR(yz 
wi + 1,abspeich*, ","): IF yzwiOO THEN anzzei 
l*anzzeil+l ELSE wzwi=90 
1270 NEXT 

1280 mompos=0:tatspalt=anzzei1:anzzeiI=anz 
zei1*3-1:IF helpquer=0 THEN anzzei1=anzzei 
1+3:RETURN 

1290 FOR wzwi = 1 TO tatspa11:yzwi* INSTR(yzw 
i+1,abspeich*,","):mompos=VAL("&”+MID*(abs 
peich*,yzwi-2,2))+mompos:NEXT 
1300 yzwi=INSTR(abspeich*,"DATA"):yzwi=INS 
TR(yzwi+6,abspeich*," "):quersum(zeiImax)= 
VAL("&"+RIGHT*(abspeich*, xzwi-yzwi)) 

1310 IF quer sum (zei l max ) Omompos THEN unte 

rhex=l 

1320 RETURN 

1330 •«***«* DATEI SAVEN *****«*##***#» 
1340 IF POS(#0)*1 THEN PRINT CHR*(7);:GOTO 
390 

1350 CALL &BB84:WINDOW SWAP 0,2:CLS:PR I NT" 


[34853 

[111483 

[64173 

[95623 

[31703 

[76643 

[56533 

(70413 

(91143 


[4663 

[17773 

(10403 

[57173 


[20123 

(18403 

[47283 

[21893 

(55013 

(175823 


(14333 

[36723 


[58163 


[168933 


(70293 

(33303 

(61273 


[54633 


[350 3 
[70213 


[74013 


(83883 


(40213 

[555 3 
[18013 
[18093 

[67163 
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[—Tips & Tricks 


Wollen Sie abspeichern <J/N> ? n :GOSUB 
1400 

1360 IF jabfrag=0 THEN CLS:GOSUB 1530:WIND [18123 
OU SWAP 0,2:CALL LBB8i:G0T0 390 

1370 INPUT"Unter welchem Namen soll ich a [59173 
bspeichern ? ! ".zuleing» 

1380 CLS:PRINT" Wollen Sie Zwischenspeich C47693 
ern <J/N> ? ".-GOSUB 1480 

1390 OPENOUT""+zulelng*+".hex" [18033 

1400 FOR xzwi=l TO zeilmaxslF unterhex AND [97143 
helpquer THEN datazei*(xzwi)=dataze1*(xzw 
i PRINT#9,datazei* < xzwi)j quersum(xzwi 

) 

1410 IF unterhex=0 AND helpquer THEN dataz C7114] 
ei*(xzwi)=datazel»(xzwiPRJNT#9,dataz 
ei»(xzwi>+ B HEX»(quersum(xzwi)) 

1420 IF he 1pquer=0 THEN PRINT#9,datazei*(x [11023 
zwi > 

1430 IF jabfrag THEN quersum(xzwi)=0:dataz C33483 
e 1»(x zw1) =" " 

1440 NEXT:CLQSEQUT [9043 

1450 IF jabfrag THEN WINDOW SWAP 0,2:PRINT [31783 
:zeilmax=0:bearbzei1=1:GOTO 310 

1460 GOTO 1620 [3433 

1470 *«««#«# (J/N) ABFRAGE ««####*#»*** C5013 

1480 einlese$=INKEY*:IF einlese»= BB THEN 14 [15573 
80 

1490 ein 1ese» = UPPER*(einlese*):IF einlese* 142903 
="J"THEN jabfrag=l:GOTO 1510 

1500 IF einlese*= B N B THEN jabfrag=0:GOTO 15 C323B3 


10 ELSE 1480 

1510 RETURN [5553 

1520 •####** BEDINUNGSH1NVE1SE **#####» [21243 

1530 CLS#2:PR 1 NT#2,"Sie befinden sich im C203503 


<Eingabe> modus !":L0CATE#2,3,3:PRINT#2," 
Anz. Wertepaare :"+STR*((anzzeiI+1)/3>:CLS 


#4:PRINT#4," FOLGENDE Eingaben sind moegli 
oh : ":PRINT#4:PRINT#4, B <S> : Abspeicher 

n als Datei oder Programm" 

1540 PRINT#4," <0> : Nach oben Blaettern" 

:PRINT#4," <U> : Nach unten Blaettern":PR 

INT#4," <V> : Letzte Zeile Editieren":PR 1 

NT#4:PR1NT#4,"ZAHLEN : 0-9 / BUCHSTABE 

N : A-F B :PRINT#4:PRINT#4,” <CURSOR-TAST 
EN> RETURN 

1550 PRINT datazei*(bearbzei1):IF helpquer 
THEN PR I NT#3:PR 1 NT#3:L0CATE#3,1,2:PR I NT#3 
,VAL(datazei»(bearbzei1)):L0CATE#3,12,2:IF 
unterhex THEN PR1NT#3,quersum(bearbzei1)E 
LSE PR INT#3,HEX»(quersum(bearbzei1)) 

1568 IF promode THEN RETURN 
1570 proraode = l:CLS#2:CLS#4:PRINT#2,"Sie be 
finden sich <LIST> Modus ! B :PRINT#4, B FO 
LGENDE Eingaben sind moeglich : ” 

1580 PR INT#4:PR I NT#4," <K> : Korrektur de 

r akt. Zei1e":PRJNT#4," <0> : Nach oben B 

laettern":PR1NT#4," <U> : Nach unten Blae 

ttern"-.RETURN 

1590 CLS#2:PRINT#2,"Sie befinden sich im 
<Korrektur> modus !"iCLS#4:PR1NT#4," FOLG 
ENDE Eingaben sind moeglich : " 

1600 PRINT#4:PRINT#4, "ZAHLEN 0-9 / B 

UCHSTABEN : A-F ":PR INT#4:PR INT#4," <CUR 
S0R-TASTEN> ":PR INT#4:PR INT#4:PR INT#4," <E 
NTER> : Zum beenden der Korrektur":RETURN 
1610 PR INT#6," TASTATURBELEGUNG : ":PRINT# 
6:PRINT#6," <SHIFT + 7> = A":PRINT#6," <S 

HIFT + 8> = B":PRINT#6," <SHIFT + 9> = C 

":PRINT#6," <SHIFT + 4> = D":PR1NT#6," <S 

HIFT + 5> = E":PR1NT#6," <SHIFT + 6> = F 

":RETURN 
1620 END 


[145293 

[114013 

[9223 
[100313 

[117243 

[103373 

[133123 

[118823 

£1103 


Ready to use Tip 

SCHOLL MESSAGE 
Laufschriften In Assembler 

(geschrieben mit dem HISOFT DEVPAC-Assembler 
GENA3.1) 


für 464-664-6128 



Spieleprogrammierer, die komplette Games oder Teile 
(Unterprogramm-Routinen) in Maschinensprache schreiben, 
brauchen auch irgendwann einmal ein (Unter-) Programm, 
das eine beliebig lange Laufschrift auf dem Bildschirm aus¬ 
gibt. 

Um eine ausreichende Geschwindigkeit zu erzielen, ist man 
zwangsläufig auf die Maschinensprache-Ebene angewiesen. 
Wenn man das Ganze mit direkter Bildschirm- und Speicher¬ 
manipulation, oder mit OUTs und ähnlichen Scherzen rea¬ 
lisiert, so erreicht man akzeptable Laufzeiten und fließende 
Bewegungen (zum Beispiel: Manie Miner, Kong Strikes Back 
oder Ghostbusters), doch sind solche Verfahren äußerst kom¬ 
plex und schwieriger zu programmieren (und auch zu erklä¬ 
ren!). Oder sie sind ausreichend schnell, aber unflexibel (zum 
Beispiel: DATA BECKER; CPC Tips & Tricks Band 2, Seite 
170 ff.). 


Hier zunächst wieder einmal eine relativ einfache Lösung, 
bei der die Geschwindigkeit noch akzeptabel ist: 


1. Anfangsadresse des auszugebenden Textes und auszuge¬ 
bende Textlänge holen. 

2 . Koordinaten für die Ausgabeposition holen. 


3. Text ab der angegebenen Anfängsadresse ausgeben (mit 
der geholten Textlänge). 

4. Anfangsadresse um 1 Byte erhöhen. 

5. Feststellen, ob schon das Textende erreicht ist (gekenn¬ 
zeichnet durch ein gesetztes 7. Bit oder, wie in unserer Lö¬ 
sung, durch ein Nullbyte). 

6. Falls dies noch nicht der Fall ist, weiter mit Programm¬ 
schritt 3. 

Um dieses Unterprogramm in eigenen Spielen (oder auch 

Anwendungen) zu benutzen, sind hier noch einige Tips: 

— Benutzte Register beim Einsprung: 

HL: Textadresse 

D: X-Koordinate der Ausgabeposition 
E: Y-Koordinate der Ausgabeposition 
BC: Auf dem Bildschirm auszugebende Textlänge 

— Ab der in HL angegebenen Adresse muß der Text im 
Speicher stehen: Man sollte vor dem eigentlichen Text so- 
viele Leerzeichen anfügen wie in BC (Textlänge) ange¬ 
geben, genauso am Ende des Textes. Das hat den Vorteil, 
daß der gewünschte Text rechts hereingescrollt wird und 
wieder links komplett hinaus gescrollt wird, so daß die¬ 
ser Bildschirmabschnitt wieder so vorliegt, wie vorher. 

— In einem Spiel empfiehlt es sich, abzuff agen, ob eine Ta¬ 
ste gedrückt worden ist: Dies könnte man in Zeile 1585 
ändern. 

So könnte Sich einer, der ein Spielchen wagen will, und ewig 

vor einer Laufschrift hockt, zu Tode langweilen. 
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VAU 



Die richtige Software !S!!!! 
für den neuen Schneider-PC 

aber auch für CPC / Joyce / IBM-PC u. a. 

Für Einsteiger die KHS Quick + -Serie für Schneider PC, CPC, IBM-PC u. Komp. 


QUICKDATA* 

• Dateiverwaltung 

• Suchen 

• Selektieren 

• Drucken 

nur DM 98,- 1 


QUICKMASK* 

Maskengenerator 
freie Gestaltung 
Basiscode dabei 

nur DM 98,- 1 


QUICKFAKT 

• Faktura 

• Kunden-u. Arti- 
datei von QUICK- 
DATA + od. and. 

nur DM 98,- 


QUICKWRITE* 

• Schrei bprogr. 

• mit Adressen¬ 
vermischen 

• Hilfsmenü 

nur DM 98,- 


QUICKFIBU+ 

• Finanzbuch¬ 
haltung 

• 1500 Buchungen 

• Einf. Bedienung 

nur DM 98- 


NEU! NEU! NEU! 

für Schneider-PC / Joyce 
IBM-PC und Kompatible 


TRIO 


Das integrierte Paket 
inkl. Sofortschreibmodus 

nur DM 498,- 


TRIO ist das integrierte Programmpaket für den kommerziellen Einsatz. Es deckt die wichtigsten Aufgabengebiete wie Dateiverwaltung, Fakturierung und Finanz¬ 
buchhaltung ab. TRIO basiert auf einer Datenbank, wodurch die Daten leicht zwischen den einzelnen Programmteilen ausgetauscht werden können. Ein Sofort¬ 
schreibmodus rundet das Programmpaket ab. 

Pull-Down Menüs erlauben auch dem Laien, sofort mit dem Programm zu arbeiten, ohne daß er den Überblick verliert. TRIO arbeitet wahlweise in Farbe oder 
monochrom. Sein Abspeicherformat ist ASCII. Eine umfangreiche Bedienerführung ist selbstverständlich, und alles ist natürlich in deutscher Sprache. 


DATEI 

Die universelle Dateiverwaltung, aufgebaut auf 
einer Datenbank, eröffnet Ihnen optimale Mög¬ 
lichkeiten der Datenhandhabung. Einfach und 
schnell können Datenstrukturen, Bildschirmfor¬ 
mulare und Druckformate definiert, benutzt und 
geändert werden. 

• Fertige Formulare ermöglichen die sofortige 
Eingabe Ihrer Kunden- und Artikeldaten. 

• Freie Erstellung von Datenstrukturen mit max. 
100 Feldern/Datensatz, max. 99 Zeichen/Feld, 
theoretisch bis zu 32 Mio. Datensätze/Datei, bei 
beliebig vielen Dateien. 

• Freie Erstellung von Eingabeformularen mit 
max. 50 Ausgabefeldern und 50 Eingabefeldern, 
Prüfung auf alphanumerische Eingabe, Definie- 
rung von Vorgabetexten in den Eingabefeldern... 
... und viele weitere Möglichkeiten 


FAKT 

Die universelle Fakturierung, mit frei anzupas¬ 
senden Druckformaten. 

• Kundenadressen und Artikeldaten können di¬ 
rekt aus den durch das Modul DATEI angelegten 
Dateien übernommen werden. 

• Alle Artikeldaten können auch einzeln manuell 
erfaßt werden. 

• Während des Artikelerfassens sind beliebige 
Korrekturen möglich. 

• Alte Rechnungsdaten werden abgespeichert. 

• Freier Entwurf Ihres persönlichen Rechnungs¬ 
formulars. 

• Freie Bestimmung des Mwst.-Satzes. 

• Bis zu 5 Zahlungsziele und Texte möglich. 

• Nach Bedarf können Sie zu jeder Rechnung 
noch einen beliebigen Text einfügen... 

... und viele weitere Möglichkeiten 


FIBU 

Die universelle Finanzbuchhaltung, leicht und si¬ 
cher zu bedienen. 

• Freie Gestaltung des Kostenrahmens mit be¬ 
liebig vielen Konten. 

• 4ste!!ige Kontenschlüssel zur Benutzung des 
Datev-Kontenrahmens. 

• 8 Steuerschlüssel möglich. 

• Kontenpian kann ausgedruckt und sortiert 
werden. 

• Anzahl der Buchungen nur durch das Spei¬ 
chermedium begrenzt. 

• Verbuchung wahlweise mit Gegenkonto. 

• Ausdruck des Journals. 

• Erstellung der Gewinn- und Verlustrechnung 

• Ausdruck aller Daten zur Umsatzsteuervoran¬ 
meldung 

... und viele weitere Möglichkeiten 


QUICKDATA*3.0 Joyce 

Leistung wie Datei 

von TRIO s. O. DM 198,- 


QUICKFAKT + 3.0 Joyce 

QUICKFIBU3.0 Joyce 

Leistung wie Faktura 

Leistung wie Fibu 

von TRIO s. o. DM 198,- W 

von TRIO s.o. DM198,- 




Leistungsbeweis: 
Der Schneiderte 



DAS KOMPLETT-ANGEBOT: PG mrt 
2-Taatan-Maua, Software: MS DOS 3.2, 
GEM, GEM Deaktop, GEM Palm, DOS Plut. 
Locomotiv* BASIC 2, ausführlich** 
Banutnr-Handbuch In Dauiach 


Die KHS-Produkte erhalten Sie in Fachgeschäften und Fachabteilungen der Warenhäu¬ 
ser. Und wir haben den Vertrieb von KHS-Produkten: 



Zentrale: Computebörse ZIV GmbH 

Heidemannstraße 1 ■ 8000 München 45 • Telefon 089 / 316 40 04 - 5 
# • OCompute-TAX - Deutschlands einziger Marktspiegel für 
Neu- und Gebrauchtkomputer. Erscheint monatlich mit aktuellen Preisen. 
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1—Tips & Tricks 


Ein Beispiel für 

eine kurze Anwendung: 

1018 text: 

defm “ 



1019 

defm “Hallo, Leute ... Das“ 

Fügen Sie bitte ein: 

1020 

defm “ist ja ’n Hammer ! “ 



1021 

defm “ “ 

1011 bsp: 

Id hl,text 

1022 

defb 0 

1012 

ld d,l 

1023 


1013 

ld e,l 



1014 

ld bc,20 

Falls einer von Euch eine schnellere, bessere, elegantere 

1015 

call scrmes 

(oder was auch sonst) Routine hat, schickt sie uns doch mal 

1016 

ret 

zu! Jungs, und immer mit Taktzyklen geizen ... 

1017 



(Eckehart Röscheisen) 


Hl«ott QENA3.1 

Aaaeablar. Pag« 

i. 




A01A 

D5 

1340 












A01B 

E5 

1350 




Pili 








AQ1C 

AF 

1360 












A01D 

12 

1370 

ld 











A01E 

ED5B42AD 







1020 

org 





A022 

SD5385B2 

1390 

ld 

(»b2B5>■da 












1400 prmt! 

ld 











A027 

B7 













A02B 














A02A 

ES 









Scrolling ■cDoag« 




A02B 

CD5DBB 








*•»**«••*«** 

.......... 68 B ytaa 




A0 2E 

El 

1450 












A02F 

23 

1460 


hl 










A030 

1ÖF4 









addrasB 




A0 32 

06 F 5 








» D - X Coordinata of mesaaga 




A0 34 








1120 

I E » Y Coordinata of roaaKage 




A036 








1130 

| BC - Text 

length dieplayed 




AD37 

30F9 

1510 












AD39 

Bl 





A000 

3AB8B2 

1350 

ßcrmeei ld 

a,(ib2BB) 

I 664. 

612B l 








AQ03 

3D 

1160 

dec 

• 




A03B 

CI 

1540 




A004 

83 


add 

a. a 




A03C 

Fl 

1550 




A005 




e , a 




A03D 

23 





ADOS 

3AB9B2 

1190 

ld 

a,<fb2B9> 

i 664, 

6128 1 

tb?2a 

A0 3E 

12 

1570 




A009 

3D 

1200 

daa 

a 




A03F 

13 

15B0 




A00A 

B 2 

1210 


6 «d 




A040 

18D3 





AQ OB 

57 

1220 

ld 

d.a 








** 


A00C 

ED5342A0 

1230 

ld 

(ütore) i de 




A0 4 2 






A010 

E5 

1240 

push 

hl 






1620 




A0 11 

Dl 

1250 


de 










A012 

EB 

1260 

ex 

da, hl 




Psbe 






A013 

09 

1270 

add 

hl.bc 










A014 

EB 

12 B0 

ex 

da, hl 




flback A032 locata A01E orint A026 


A015 

1A 


ElOOpi ld 

a ■ (da) 




Bcriti 






or 

■ 










A017 

CB 

1310 

rat 

z 










A01B 

F5 

1320 

puah 

af 




Tabla 





AQ19 

C5 

1330 

puah 

bc 











SPLIT SCREEN 

- mehr Farbe, mehr Mode... 


für 464-664-6128 



Zuerst möchte ich mich bei allen CPC 664- und CPC 
6128-Usem entschuldigen, die in der Ausgabe 11/1986 von 
»CPC International« das Grundprogramm zum Artikel »Jetzt 
wirds bunt — Gate Array mit Pep« abgetippt und eine böse 
Überraschung erlebt haben. Denn dieses Programm war nur 
für den CPC 464 konzipiert. Zur Wiedergutmachung finden 
Sie in dieser Ausgabe das korrekte Listing in DATAs und As¬ 
sembler, sowie eine RSX-Erweiterung für Ihre CPCs. Au¬ 
ßerdem wurde das letzte Assembler-Listing ein Opfer des 
Layouts: Es wurde in der falschen Reihenfolge zusammen¬ 
gesetzt, ist aber vollständig und auf dem CPC 464 lauffähig. 
Anfangs war das Programm als richtige BASIC-Erweiterung 
geplant (und auch schon fast fertig), aber um auch die ande¬ 
ren CPC-User (664/6128) zufriedenzustellen, wurde es in 
eine RSX-Erweiterung umgearbeitet. Denn der CPC 464 ist 
ja bekanntlich der einzige mit BASIC-Patches im RAM. 
Zu der Erweiterung ist eigentlich nicht viel zu sagen, sie soll 
nur der Veranschaulichung und Demonstration des vorigen 
Artikels über den geteilten Bildschirm dienen. Wer f ne 
ernsthafte Benutzung in Betracht zi< ht, is* mit dem 
Assembler-Grundprogramm besser bedient - F ’a 


Änderungen und Vereinfachungen einbauen. Die Grundla¬ 
gen dazu wurden ja erklärt. Aber man sollte sich immer zu¬ 
erst überlegen, ob sich der Aufwand lohnt, solch einen ge¬ 
teilten Bildschirm zu installieren. 

Doch nun zu unserem RSX-Häppchen: 

1. Geben Sie das DATA-Listing für Ihre CPC-Version ein. 
2 . Speichern Sie es sicherheitshalber ab. 

3. Starten Sie nun mit RUN. 

4. Verbessern Sie eventuelle Fehler. 

5. Nun speichert das Programm automatisch ein File mit 
dem Namen »PEPxxxx.BIN« ab (je nach Version: Das 
664-Programm heißt auch »PEP6128.BIN!«). 

6. Tippen Sie das Beispielprogramm ab. 

7. Nach dem Abspeichem können Sie das RSX-Programm 
testen. 

Bei Diskettenbetrieb müssen Sie unbedingt auf folgendes 
achten: 

Schalten Sie bei jed DisVette^zugriff unbedingt den Inter- 
uU durch LSF’ i *3 ! m Ansonsten kommt es entweder 
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ProSoft-Preise liegen richtig! 

© 02 61/40 47-1 • Telex 862476 PSOFT 

Günstige Möglichkeit der Fianzierung durch Ratenkreditf Fordern Sie die Unterlagen an. 

Wir suchen ständig günstige Einkaufsquellen für die angebotenen und neue innovative Produkte. 


Schneider 

Schneider 464 mit grünem Monitor 
Schneider 464 mit color Monitor 


Schneider EPSON 


BiV! 748,- 
DM 1199,- 


Schneider 

6128 


M 


Schneider 6128 mit grünem 
Monitor 

DM 898,- 

Schneider 6128 mit color Monitor 

DM 1498,- 

DDI-1 448,- FD-1 448,- 
MP-1 119,- MP-2 139,- 



Joyce PCW - 8256 

DM 1548,- 

FD-2 1 MB Laufwerk 

DM 598,- 

Joyce + PCW - 8512 

DM2098,- 


DMP-2000 

DM 599,- 

Druckerkabel, für alle Drucker mit Centronics- nHfl OO 

Schnittstelle an den Schneider 6128 11111 VIVI Ot/. B 

2000 Blatt Endlospapier DM39,- 

3” Disketten für Schneider 

lOStücK 50 Stück 

Panasonic 79j— ' 

Maxell 79,“ 378,“ 

100 Stück 

680,- 

Disketten-Software für alle Schneider-Produkte preiswert auf Anfrage. Bitte 
fordern Sie die Liste an. 


Atari - Atari - Atari - Atari 

Atari 1040 ST, Tastatur, 1024 KB RAM, 192 KB ROM, integrierte 

Floppy 720 KB, Monochrom-Monitor SM 124, Maus, Basic, Logo 2198,- 

Atari 1 040 ST, Tastatur, 1024 KB RAM, 192 KB ROM, integrierte 

Floppy 72C KB. Color-Monitor SC 1224 Atari, Maus, Basic, Logo 2698,- 

Atari 1040 ST, Tastatur, 1024 KB RAM, 192 KB ROM, integr. Floppy 

720KB RGB-Monitor 10095Thomson, Maus, Basic,Logo 2598,- 

Vortex - Vortex - Vortex 



Floppy Fl-S bzw. M1-S 
Floppy Fl -0 bzw. M1-D 
Ml -X (3.5") 

F1-X (5,25") 

M1-XRS(3,5”) 

F1-XRS (5,25") 

WD-20C0 

Star NL-10 598,- 

incl. Interface für Commodore, StarNL-10 

Centronics oder IBM 

Einzelblatteinzug für Star NL-10 198,- 

zusätzliches Interface für NL-10 129,- 

SD10 968,- SR 10 1248,- 


DM 878,- 
DM1298,- 
DM 698,- 
DM 698,- 
DM 758,- 
DM 758,- 
DM 1998,- 


SD 15 

SG 15 

OKI 

1298- 

968,- 

1 OKI 

SR 15 

NX-15 

1 OKI 

1498 - 
1198,- 

OKI 

OKI 

1 OKI 

| Okimate 20 Farbdrucker mit Interface 


548,- | 


ML-182 598,- ML-183 848,- ML-192 999,- 

ML-193 1198,- ML-292 1198,- ML-293 1599,- ML-294 1998,- 

Centronics GLP-ll-4 ~ QQ 

incl, serielle und parallale Schnittstelle, incl.Tractor OUOj - 

ProSoft GmbH 

Bogenstr. 53, Postf. 207, D-5400 Koblenz-Goldgrube 
Telefon 0261/4047-1 Telex 862476 PSOFT 

Alle Preise zuzügt. 10,- DM Versandkosten pro Paket, Lieferung per Nachnahme oder Vorkasse¬ 
scheck - Versandkoster Ausland DM 40,- pro Paket. Lassen Sie sich keinen Bären aufbinden! 
ProSoft liefert Original-Produkte der führenden Hersteller, Überzeugen Sie sich selbst durch 
Abholung der Ware in unseren Verkaufs- und Vorführräumen in Koblenz. Wir gewähren Ihnen 
bei Barzahlung (kein Scheck) 2 % Skonto auf alle Preise, was vielleicht schon zur Deckung 
Ihrer Reisekosten ausreicht. CPC - 2/87 


FX-800 

948,- 


FX-1000 1248,- 

LQ-800 

1479,- 

LQ-1000 

1929- 

LQ-2500 2598,- 

JX-86 

799,- 

JX-80 

1348,- 

HI-80 1239- 

X-800 

1598,- 

EX-800 

1498,- 

EX-1000 1698,- 

Citizen - 

Citizen 

- Citizen 

LSP-120 D 



448,- 

MSP-15 e 

1095,- 

MSP-20 

998,- 

MSP-25 1198,- 

MSP-IOe 

788,- 

LSP-10 

598- 

HQP-45 2098,- 

NEC 

-NEC-NEC- 

NEC-NEC 

P 5 

2222,- 

P 6 

1239,- 

P 7 1675,- 

P 5 XL 

3398,- 

P 6 color 

1598,- 

P 7 color 2098,- 

P 6 seriell 

1798.- 

P 7 seriell 

2298,- 


Cut-Sheet-Feeder für P 6 (Emz 

Iblatlönzuo) 890,- Bidl 

ektionaler Tractor für P 6 398,- 


Brother - Brother - Brother 

M-1109 548,- M-1409 899,- M-1S09 1188,- 

M-2024 L+ 2098,- HR-15XL 1089,- HR-35 DD 2498,- 

Tandon Tandon Tandon 

XPC 20 3998,- 

PCA 30 6398,- 

Aufpreis EGA-System 1598,- 


PC 2998,- 

PCA 4998,- 

PCA40 6998,- 


XPC10 3748,- 

PCA 20 5598,- 

Aufpr.f.Farbs. 898,- 


Tandon Target 286 


5998,- 


Olivetti Olivetti Olivetti Ml 9 

Olivetti M24,640 KB, 2 Laufwerke, 360 KB. Monitor, Tastatur, 
MS-DOS, GW-Basic, Bus Converter 

Olivetti M 24, 640 KB - 1 Diskettenlaufwerk 360 KB, 1 Festplatte 
20 MB, serielle und parallele Schnittstelle. Bus Converter, 
Monitor, Tastatur, MS-DOS/GW-Basic 
Olivetti M28, AT-kompatibel, Einstiegskonfiguration 


Commodore-PC 


PC-101 


2498.- 

4999,- 


5998, 

7698, 


2868,- 


Commodore PC-10 il-20 mit20 MB Festpl. integriert, 640 KB Hauptspeicher, 

2 Diskettenlaufwerke, 1 Festplatte 20 MB (Seagate), 

AGA-Karte, Monitor. Tastatur. MS-DOS/GW-Basic_3o9o,~ 


Amiga 512 K + Monitor 
Sidecar (MS-DOS für Amiga) 


2448,- 

1598,- 


Commodore AT PC 40 80286 CPU (16 bit), 6/10 MHz Taktfrequenz 
umschaltbar, 1 MB RAM Speicher standardmäßig, 20 MB Harddisk (40 MB 
Harddisk optional) 3,5'', 1,2 MB Floppy Disk Drive 5.25’, serielle Schnitt¬ 
stelle, parallele Schnittstelle, Multi-Grafikkarte (AGA), hardwaregesteuerte 
Echtzeituhr mit Kalender, IBM AT kompatibles Keyboard, 
Schlüsselschalter. 14” Monochrom-Bildschirm_ 6398;— 


MPS 1000 incl. parallel und Commodore Schnittstelle 


648,- 


Floppy 1571 
Commodore C 128 


688 ,- 

679,- 


Monitor 1901 
Commodore 128 D 


699,- 

1279,- 


C 64II incl. Geos 


468,- 


Plantron - Plantron - Plantron 


Plantron PT-16 LC umschaltbar 4,77/8 MHz, 256 KB Hauptspeicher. Monochrom-Gra- 
fikkarte (Herkules kompatibel), paralleler Druckeransch uß, 1 Diskettenlaufwerk 360 KB, 
Tastatur (deutsch! mit separatem Cursorblock, 

MS-DOS 3.2/GW-Basic 


Plantron PT-16 LC 2/20 wie PT-16 LC, zusätzlich 20 MB Festolatte 


1398,- 
2698,- 

Plantron PT-16 LC/30 wie PT-16 LC, zusätzlich 30 MB Festplatte 2878,- 
Plantron PT-16 XT Turbo 4,77 und 6 MHz Takt, 2o6 KB Hauptspeicher, Monochrom- 
Grafikkarte (Herkules kompatibel), Multifunktionskarte mit paralleler Schnittstelle, seriel¬ 
ler Schnittstelle, Game Port, Echtzeituhr, MS-DOS 3.2 incl. Basic. RAM Disk, Drucker¬ 
spooler, Bedienungsanleitung und Zubehör, 2 Diskettenlaufwerke _ 

ä360 KB, Tastatur mit separatem Cursorblock 1878,— 

Plantron PT-16XT2/20Turbo wie PT- l6XTTurbo,zusä?zl 20MB Festpl. 3098,- 

Plantron PT-16 XT 2/30 wie PT-16 XT Turbo. zusatzl. 30 MB Festpl. 3298,- 
Plantron PT-16 AT 6 MHz oder 8 MHz Taktfrequenz, 6^0 KB RAM (bis 1 MB on Board), 
Monochrom-Grafikkarte (Herkules kompatibel), Multi I/O Karte mit: paralleler Schnitt¬ 
stelle, serieller Schnittstelle, Game Port: Floppy-Hard-Disk Controller, Diskettenlaufwerk 
1.2 MB, Tastatur (deutsch) mit separatem Cursorblank, Echtzeituhr. _ _ y o 

MS-DOS 3.2/GW-Basic, Bedienungsanleitung und Zubehör 3848,— 

Plantron PT-16 AT/20 wie PT-16 AT, zusätzlich mit 20 MB Festplatte 4698,- 


Plantron PT-16 AT/30 wie PT-16 AT, zusätzlich mit 30 MB F .»srpiatte 


Disketten No-Name »stück 

50 Stück 

100 Stück 

3Va"1D 

35 - DM 

149,- DM 

279,- DK/ 

3V2”2D 

39,- DM 

169,- DM 

319,- DIV 

5V4”2D 

19,-DM 

59 - DM 

89,-DM 

5V«” 1 D 

100 Stück 


79,- DM 

5VV’ Data lifeHD, 1,6 MB 

10 Stück 


98,- DM 






















































I—Tips & Tricks 


zu einem unschönen Farbflackern oder sogar zu Systemab¬ 
stürzen. So behalten Sie Ihr Programm und Ihre Farben, und 
können den Interrupt danach wieder problemlos mit 
ISPLIT.ON einschalten. 

Zur Programmierung stehen folgende RSX-Befehle zur Ver¬ 
fügung: 

ISPLIT.BORDER, bar, border 

Setzt für den Balken (1—4) einen rechts- und linksseitigen 
Rand (0—27), der bei laufendem Interrupt ausgegeben wer¬ 
den kann. Wird eine falsche Anzahl von Parametern überge¬ 
ben, so springt das Programm ohne Bearbeitung ins BASIC 
zurück. Falls eines der beiden gelesenen Lowbytes nicht im 
legalen Bereich ist, wird genauso verfahren. 

ISPLIT.DELAY, bar, delay 

Ordnet dem Balken (1—4) einen Verzögerungswert (0—255) 
zu, der die Balkenbreite reguliert. Dieses Kommando soll¬ 
te bei ausgeschaltetem Interrupt angewandt werden (siehe 
ISPLIT.OFF). Es wird nur das Lower-Byte gelesen. Wird 
eine falsche Anzahl von Parametern übergeben, so springt 
das Programm ohne Bearbeitung ins BASIC zurück. 

ISPLIT.INK, bar, ink, col 

Ordnet im Balken (1-4) dem Ink (0-16) einen Farbwert 
(0—27) zu. Ist der Balken angeschaltet, wird der Farbwert so¬ 
fort ausgegeben, ansonsten erst beim Einschalten (siehe ISP¬ 
LIT.ON, bar). Wird eine falsche Anzahl von Parametern 
übergeben, so springt das Programm ohne Bearbeitung ins 
BASIC zurück. 

ISPLIT.MODE, bar, mode 

Ordnet dem Balken (1—4) einen Hardwaremode (0—2) zu. 
Ist der Balken in Betrieb, so wird dieser sofort ausgegeben, 
ansonsten erst beim Einschalten des Balkens. Der Modus 
sollte im Normalfall dem mit MODE eingestellten Modus 


entsprechen. Wird eine falsche Anzahl von Parametern über¬ 
geben, so springt das Programm ohne Bearbeitung ins BA¬ 
SIC zurück. 

ISPLIT.OFF 

Schaltet den Interrupt für die Steuerung der Farben ab, ohne 
dabei die definierten Werte zu zerstören. Ein ausgeschalte¬ 
ter Interrupt kann jederzeit wieder eingeschaltet werden (sie¬ 
he ISPLIT.ON). Für Diskettenkommandos empfiehlt sich 
dieser Befehl, weil es sonst zu unschönem Farbflackern oder 
sogar zu Systemabstürzen kommen kann. 

ISPLIT.OFF, bar 

Schaltet nur einen mit bar definierten Balken (1-4) ab, ohne 
dessen definierte Werte zu zerstören. Ein so ausgeschalteter 
Balken kann jederzeit wieder eingeschaltet werden (siehe 
ISPLIT.ON, bar). Wird die falsche Anzahl von Parametern 
übergeben, so springt das Programm ohne Bearbeitung ins 
BASIC zurück. 

ISPLIT.ON 

Schaltet den Interrupt für die Steuerung der Farben wieder 
ein und gibt wieder die vorher definierten Farben aus. (Sie¬ 
he auch ISPLIT.OFF). 

ISPLIT.ON, bar 

Schaltet den mit bar (1—4) definierten Balken wieder ein, und 
übergibt diesen dem laufenden Interrupt. Die vorher definier¬ 
ten Werte sind erhalten geblieben. Wird die falsche Anzahl 
von Parametern oder eine falsche Parametergröße angegeben, 
so springt das Programm ohne Bearbeitung ins BASIC zu¬ 
rück. 

Studieren Sie doch einmal das Beispiel-Listing, dann wird 
das Erklärte sehr schnell klar ... An Fragen und Anregun¬ 
gen sind wir übrigens immer sehr interessiert. 

(Eckehart Röscheisen) 


Listing 1 

lOOO ’ 


[1173 

1300 

1310 

1320 

DATA 

DATA 

DATA 

CD,14,Al,CD,21,Al.CB.BE 

C9, FE,02,CO,DD,7E,00,FE 

03,DO,4F,DD,23,DD,23,CD 

[1791] 
t17673 
[11713 

1010 

’ SPLIT 

C1693 

1330 

DATA 

14,Al,CD,21,Al,7E,ES,80 

( 18903 

1020 

’ RSX 

-Erweiterung CPC 464 

[ 19653 

1340 

DATA 

Bl, 77, C9,FE, 02,CO,DD,7E 

[11143 

1030 

? 


[1173 

1350 

DATA 

00,4F,DD,23,DD,23,CD,14 

[17653 

1040 

’ HEX 

-Lader 

C4383 

1360 

DATA 

Al,CD,21,Al,23,71,C9,FE 

[12743 

1050 

* Aufruf: CALL S.A000 

[7793 

1370 

DATA 

02,CO,DD,7E,00,FE,1B.D0 

[19213 

1060 

» 


[1173 

1380 

DATA 

4F, DD, 23, DD,23,CD,14,Al 

[12903 

1070 

MEMORY 40959 

[4403 

1390 

DATA 

CD,21,Al,41,E5,21,2D,Al 

[12013 

1080 

FOR n 

=40960 TO 41554 

[7161 

1400 

DATA 

78,B7,28,03,23,10,FD,7E 

[867 3 

1090 

READ 

di: di = "&<" + d$ 

[789 3 

1410 

DATA 

E1,23,23,77,C9,FE,03,CO 

[6473 

1100 

POKE 

n,VAL(di) 

[395 3 

1420 

DATA 

DD,7E,00,FE,1B,D0,4F,DD 

[809 3 

1110 

NEXT 


[350 3 

1430 

DATA 

23, DD,23,DD,23,DD,23,CD 

[743 3 

1120 

SAVE" 

PEP464.B1N",B,40960,595 

[16963 

1440 

DATA 

14, Al,CD,21,Al,41,E5,21 

[13383 

1130 

END 


[1103 

1450 

DATA 

2D, Al, 78,B7,28,03,23,10 

[16423 

1140 

: 


[ 174] 

1460 

DATA 

FD,7E,El,23,23,23,DD,2B 

[9743 

1150 

DATA 

3E,C9,32,00,A0,CD,48,Al 

[14063 

1470 

DATA 

DD,2B,DD,2B,DD,2B,DD,46 

[11153 

1160 

DATA 

01,il,A0,21,01,A0,C3,Dl 

[16053 

1480 

DATA 

02,F5,78,B7,28,03,23,10 

[14053 

1170 

DATA 

BC,25,AO,C3,61,AO,C3,71 

[7183 

1490 

DATA 

FD, Fl,77,C9,DD,7E,00,FE 

(923 3 

1180 

DATA 

AO,C3,81,AO,C3,AF,AO, C3 

[989 3 

1500 

DATA 

05,El,DO,B7,C8,E5,3D,47 

[ 10203 

1190 

DATA 

D5,AO,C3,9B,A0,53,50,4C 

[359 3 

1510 

DATA 

C9,AF,57,C6,13,10,FC,5F 

[ 11343 

1200 

DATA 

49,54,2E,4F,CE,53,50, 4C 

[ 13953 

1520 

DATA 

21,05,A2,19,C9,54,44,55 

[ 12983 

1210 

DATA 

4Q,54,2E,4F,46,C6, 53,50 

C16363 

1530 

DATA 

5C,58,5D,4C,45,4D,56,46 

[ 11823 

1220 

DATA 

4C, 49,54,2E,4D,4F,44,C5 

[18433 

1540 

DATA 

57,5E,40,5F,4E,47,4F,52 

[ 12783 

1230 

DATA 

53,50,4C,49,54,2E,42,4F 

[ 10933 

1550 

DATA 

42,53,5A,59,5B,4A, 43, 4B 

[20433 

1240 

DATA 

52,44, 45,D2,53,50,4C,49 

[10633 

1560 

DATA 

21,FC,Al,CD,DA,BC,3E,CD 

[20213 

1250 

DATA 

54,2E,49,4E,CB,53,50,4C 

( 16033 

1570 

DATA 

21,A4,Al,32,3A,B9,22,3B 

C14063 

1260 

DATA 

49,54,2E,44,45,4C,41,D9 

[ 14673 

1580 

DATA 

B9,21,FE,Bl,C3,DD,BC,3E 

[9843 

1270 

DATA 

00,B7,CA,48,Al,FE,01,CO 

[ 10663 

1590 

DATA 

08,21,38,33,32,3A,B9,22 

[10333 

1280 

DATA 

CD,14,Al,CD,21,Al,CB,FE 

[17993 

1600 

DATA 

3B, B9,C9,21,92,Bl,11, D9 

£ 12953 

1290 

DATA 

C9,B7,CA,5F,Al,FE,01,CO 

[10873 

1610 

DATA 

Bl, 3A, C8,Bl,F3,D9,CB,89 

[18823 
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0 23 66 / 
8 44 54 


srnoRüM 

COMPUTER GMBH * EWALDSTR. 181 " 4352 HERTEN 


y 0 23 66/ 
8 44 98 




Statistic STAR 

98,00 

STAR Base 

198,00 

Business STAR 

298,00 

Fibu-STAR Plus 

298,00 

Kontenblätter (1000 st. Endi.) 

49,90 


STAR-Mail 98,00 
Datei-ST AR 98,00 
als Joyce-Mailing- 

s rr 189,00 


Leerdisketten MAXELL CF-2 


löst. 


79,50 


STAR-Writer I 198,00(0) 
Datei-STAR 98,00 (D) 
59,90 (K) 
Statistik-STAR 79,90 (D) 


Copy-STAR II 29,90 (K) 
39,90 (D) 
Designer-STAR 29,90 (K) 
39,90 (D) 
Creator-STAR 49,90(0) 


STAR-Mon 


Mathe-STAR 


CPC-Writer 


Disksort-STAR 49,90 (D) Composer-STAR 98, 


59.90 (K) 

79.90 (D) 

69.90 (K) 

79.90 (0) 

39.90 (K) 

•TTU7 


STAN u. d. 29,90 (K) 


29,90 (K) 


29,90 (K) STAR- 


Zauberstab 39,90(0) p y ramide 39,90(0) Puzzle 39,90(0) Games 


19.90 (K) 

39.90 (D) 


23 66 / 8 44 54 Bestelltelefon 


23 66 / 8 44 98 


Panasonic Matrix- u. Typenraddrucker 


1080 498,-/1091 689,-/1092 939,-/1592 1195,-/1595 1598,-/3151 1298,- 


Druckerständer (ca. 30 x 40 cm) 35 


Zubehör wie Einzelblattschächte oder Butfer-Erweiterungen aut Anfrage 


PVC-Abdeckhauben 


NEU! NEU! 


maßgeschneidert 


faltbar für 


alle 


von 


13,95 


bis 


Schneider-Geräte (Drucker, Monitore, Computer,Tastaturen etc.) 22,95 


Diskettenbox 

f. 50 3"-Disks _ _ Ä _ 

15,95 


SPIELE / Software 

in großer Auswahl 
immer kurzfristig lieferbar! 


Lightpen 




23 66 / 8 44 54 Bestelltelefon 


softwareunterstützt 

139,00 


23 66 / 8 44 98 


Wir bieten auch Finanzierungen an. Bitte fordern Sie die Unterlagen mit dem entsprechenden Coupon an. Beispiel: 36 Mon. Laufzeit = 
effekt. Zinss. 15,4 % p. a. 


SF 12 

O Ja. >ch interessiere mich für Ihr Finanzierungsangebot. 
Bitte senden Sie die erforderlichen Unterlagen an 


Rückporto ist beigelegt (1,30 DM/Briefmarken) 


SF 12 


BESTELL -COUFOn 

Einsenden an: SYNDROM GmbH ■ Ewaldstraße 181 • 4352 Herten 
O Bitte senden Sie mir Ihre Liste (kostenlos!) 


Hiermit bestelle ich 


□ per Nachnahme □ Verrechnungsscheck liegt bei 
(Versandkosten nicht vergessen!) 


an 































r~Tips & Tricks 


1620 DATA CB,81,Bl,4F,ED,49,FB, D9 
1630 DATA 36,05,3C,2E,FB,A6,20,02 
1640 DATA 1E,EA,D5,13,01,00,7F,CD 
1650 DATA 97,Al,FE,10,20,F9,Di,ED 
1660 DATA 49,1A,13,E6,1F,F6,40,ED 
1670 DATA 79,0C,79,C9,08,DA,70,B9 
1660 DATA F5,D9,06,F5,ED,78,1F,38 
1690 DATA 3C,3A,92,Bl,3D,47,05,AF 
1700 DATA 57,C6,13,10,FC,5F,21,05 
1710 DATA A2,19,CB,7E,28,27,56,23 
1720 DATA 46,00,10,FD,06,7F,7A,E6 
1730 DATA 03,57,CB,FF,ED,79,79,E6 
1740 DATA FC,B2,4F,23,11,5F,10,CD 
1750 DATA F2,Al,16,00,CD,F2,Al,14 
1760 DATA 7A,FE,OF,20,F7,06,7F,D9 
1770 DATA Fl,C9,7E,A3,28,04,ED,51 
1780 DATA ED, 79,23,C9,00, 00, 00,00 
1790 DATA 00,81,6B,Al,00,81,33,54 
1800 DATA 54,4B,40,44,5C,4C,46,52 
1810 DATA 50,51,51,50,50,44,40,40 
1820 DATA 00,67,00,00,00,00,00,00 
1830 DATA 00,00,00,00,00,00,00,00 
1840 DATA 00,00,00,00,98,00,00,00 
1850 DATA 00,00,00,00,00,00,00,00 
1860 DATA 00,00,00,00,00,00,00,04 
1870 DATA 00,00,00,00,00,00,00,00 
1880 DATA 00,00,00,00,00,00,00,00 
1890 DATA 00,00,00 


Listing 2 


1000 ’ 

1010 ’ SPLIT 

1020 ’ RSX-Erweiterung CPC 664/6128 
1030 » 

1040 * HEX-Lader 

1050 ’ Aufruf: CALL &AOOO 

1060 ’ 

1070 MEMORY 40959 

1080 FOR n=40960 TO 41556 

1090 READ d*:d* = "8<" + d* 

1100 POKE n,VALCdt) 

1110 NEXT 

1120 SAVE"PEP6128.BIN",B,40960,597 
1130 END 
1140 : 

1150 DATA 3E,C9,32,00,AO,CD,48,Al 
1160 DATA 01,11,AO,21,01,A0,C3,Di 
1170 DATA BC,25,AO,C3,61,AO,C3,71 
1180 DATA AO,C3,81,AO,C3,AF,AO,C3 
1190 DATA D5,AO,C3,9B,AO,53,50,4C 
1200 DATA 49,54,2E,4F,CE,53,50,4C 
1210 DATA 49,54,2E,4F,46,C6,53,50 
1220 DATA 4C, 49,54,2E,4D,4F,44,C5 
1230 DATA 53,50,4C,49,54,2E,42,4F 
1240 DATA 52,44,45,D2,53,50,4C,49 
1250 DATA 54,2E,49,4E,CB,53,50,4C 
1260 DATA 49,54,2E,44,45,4C,41,D9 
1270 DATA 00,B7,CA,48,Al,FE,01,CO 
1280 DATA CD,14,Al,CD,21, Al,CB,FE 
1290 DATA C9,B7,CA,5F,Al,FE,01,CO 
1300 DATA CD,14,Al,CD,21,Al,CB,BE 
1310 DATA C9,FE,02,CO,DD,7E,00,FE 
1320 DATA 03,DO,4F,DD,23,DD,23,CD 
1330 DATA 14,Al,CD,21,Al,7E,E6,80 
1340 DATA Bl,77,C9,FE,02,CO,DD,7E 
1350 DATA 00,4F,DD,23,DD,23,CD,14 
1360 DATA Al,CD,21,Al,23,71,C9,FE 
1370 DATA 02,CO,DD,7E,00,FE,1B,DO 
1380 DATA 4F,DD,23,DD,23,CD,14,Al 
1390 DATA CD,21,Al,41,E5,21,2D,Al 
1400 DATA 78,B7,28,03,23,10,FD,7E 
1410 DATA El,23,23,77,C9,FE,03,CO 
1420 DATA DD, 7E,00,FE,1B,DO,4F,DD 
1430 DATA 23,DD,23,DD,23,DD,23,CD 
1440 DATA 14,Al,CD,21,Al,41,E5,21 
1450 DATA 2D,Al,78,B7,28,03,23,10 
1460 DATA FD,7E,El,23,23,23,DD,2B 
1470 DATA DD,2B,DD,2B,DD,2B,DD,46 
1480 DATA 02,F5,78,67,28,03,23,10 
1490 DATA FD,Fl,77,C9,DD,7E,00,FE 
1500 DATA 05,El,DO,B7,C8,E5,3D,47 
1510 DATA C9,AF,57,C6,13,10,FC,5F 
1520 DATA 21,06,A2,19,C9,54,44,55 


C19651 
C9831 
C10331 
[10001 
[13301 
[10033 
[15813 
[14941 
£12923 
£7671 
[9861 
£18221 
[10143 
[12643 
[21553 
£ 18211 
[13641 
£13311 
£11533 
[11073 
£11941 
£10053 
[13711 
[10051 
[9153 
£ 10051 
£ 1005 3 
[4531 


£1171 

£ 1693 

£21593 

[1171 

[4381 

[779 3 

[1173 

[4403 

[7221 

[789 3 

£3951 

£3501 

£15351 

[1103 

£1743 

£ 14061 

£16053 

£7183 

[9893 

£359 3 

£13953 

[16361 

[18433 

[10931 

£ 1063 3 

E16033 

E14873 

£ 1066 3 

£ 17991 

£ 10871 

[17913 

£ 17671 

£11713 

£ 18903 

[11143 

£17653 

£12743 

£19213 

£ 12903 

[12013 

£867 3 

£6473 

£8091 

£7431 

£ 13383 

[16423 

[974 3 

£11153 

£14053 

£923 3 

£ 10203 

£11343 

£11603 


1530 DATA 5C,58,5D,4C,45,4D,56,46 
1540 DATA 57,5E,40,5F,4E,47,4F,52 
1550 DATA 42,53,5A,59,5B,4A,43,4B 
1560 DATA 21,FD,Al,CD,DA,BC,3E,CD 
1570 DATA 21,A5,Al,32,42,B9,22,43 
1580 DATA B9,21,F9,B7,C3,DD,BC,3E 
1590 DATA 08,21,38,33,32,42,B9,22 
1600 DATA 43,B9,C9,21,BF,B8,11,D4 
1610 DATA B7,3A,C3,B7,F3,D9,CB,89 
1620 DATA CB,81,Bl,4F,ED,49,FB,D9 
1630 DATA 36,05,3C,21,F6,B7,A6,20 
1640 DATA 02,1E,E5,D5,13,01,00,7F 
1650 DATA CD,98,Al,FE,10,20,F9,Dl 
1660 DATA ED,49,1A,13,E6,1F,F6,40 
1670 DATA ED, 79, OC, 79, C9,08,DA,78 
1680 DATA B9, FB,B9,06,F5,EB,78,1F 
1690 DATA 38,3C,3A,BF,B8,3D,47,05 
1700 DATA AF,57,C6,13,10,FC,5F,21 
1710 DATA 06,A2,19,CB,7E,28,27,56 
1720 DATA 23,46,00,10,FD,06,7F,7A 
1730 DATA E6,03,57,CB,FF,ED,79,79 
1740 DATA E6,FC,B2,4F,23,11,5F,10 
1750 DATA CD,F3,Al,16,00,CD,F3,Al 
1760 DATA 14,7A,FE,OF,20,F7,06,7F 
1770 DATA D9,Fl,C9,7E,A3,28,04,ED 
1780 DATA 51,ED,79,23,C9,00,00,00 
1790 DATA 00,00,81,6B,Al,00,81,33 
1800 DATA 54,54,4B,40,44,5C,4C,46 
1810 DATA 52,50,51,51,50,50,44,40 
1820 DATA 40,00,67,00,00,00,00,00 
1830 DATA 00,00,00,00,00,00,00,00 
1840 DATA 00,00,00,00,00,98,00,00 
1850 DATA 00,00,00,00,00,00,00,00 
1860 DATA 00,00,00,00,00,00,00,00 
1870 DATA C4,00,00,00,00,00,00,00 
1880 DATA 00,00,00,00,00,00,00,00 
1890 DATA 00,00,00,00,00 


£11823 
£ 12783 
£20433 
£10933 
£14793 
£ 12803 
£ 12383 
£9153 
£15283 
£ 19653 
£954 3 
£20853 
E10873 
E14293 
£ 16743 
£14923 
£483 3 
£20033 
£8903 
£ 16343 
£15613 
£ 16993 
£10283 
£13313 
£11133 
£894 3 
£14323 
£ 1306 3 
£989 3 
£887 3 
£ 10053 
[11923 
[10053 
[10053 
£ 13443 
£10053 
[5683 


Listing 3 

1010 * Bei spie 1 Programm £16003 

1020 » zu PEPxxxx.BIN [9473 

1030 ' 01.11.1986 E.R. £7573 

1040 ’ £1173 

1050 MEMORY &9FFF £1343 

1060 MODE 1 £5063 

1070 IF PEEK(&BB4F)=120 THEN LQAD"PEP464.B £48493 

IN", &AOOO:GOTO 1090 


1080 

LQAD"PEP6128.BIN",&A000:GOTO 1090 

£22353 

1090 

FOR i=1 TO 25 


£3123 

1100 

PEN (1 MOD 3)+1 


£926 3 

1110 

PRINT TAB(7>"Video Gate 

Array mit 

PE £23623 

P !" 




1120 

NEXT 


£3503 

1130 

CALL &BB18 


£389 3 

1140 

CALL &A000 


£6373 

1150 

!SPLIT.ON 


£ 10733 

1160 

BORDER 0 


£ 10083 

1170 

!SPLIT.DELAY,4,2 


£ 15233 

1180 

fSPLIT.DELAY,3,47 


£14683 

1190 

ISPLIT.DELAY,2,99 


£ 16593 

1200 

FOR i=l TO 4 


[4503 

1210 

ISPLIT.ON,i 


£11913 

1220 

ISPLIT.MODE,i,1 


£ 14433 

1230 

ISPLIT.INK,1,1,26 


£10823 

1240 

READ value 


£4433 

1250 

ISPLIT.INK,i,0,value 


£ 15863 

1260 

ISPLIT.BORDER,i,value 


£ 17673 

1270 

NEXT 


£3503 

1280 

* Patriotische Farben .. 


£ 1945 3 

1290 

DATA 24,6,6,0 


£6753 

1300 

’ Nicht weniger farbige 

PENs 

£ 1582 3 

1310 

DATA 2,6,1,4 


[294 3 

1320 

DATA 3,10,9,7 


[6583 

1330 

DATA 5,11,13,8 


£622 3 

1340 

DATA 18,19,20,9 


£664 3 

1350 

* Und lesen und ... 


£589 3 

1360 

FOR i=l TO 4 


£450 3 

1370 

FOR j=l TO 3 


£6183 

1380 

READ value 


£443 3 

1390 

ISPLIT.INK,i, j ,value 


£ 17043 

1400 

NEXT 


£350 3 

1410 

NEXT 


[350 3 

1420 

CALL &BB18 


£389 3 

1430 

* Arbeitspause ... 


£ 11943 

1440 

END 


£ 1103 
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Aktuelle CPC BuchhHs 



CRC 

6128 


FÜR 

EINSTEIGER 


EIN DATA BECKER BUCH 









Wenn Sie gründliche Einstelger-Informatlo- 
nen zum CPC 6128 suchen - hier finden 
Sie sie. Einfach zu versfehen und trotzdem 
mit vielen Anregungen, Ideen und einer 
vollständigen Adreßverwoltung, die Sie 
gemeinsam mit dem Autor entwickeln: 

Vom ersten Schritt zur Bedienung und 
Handhabung des Rechners bis zu den 
ersten Erfahrungen in BASIC deckt dieses 
Buch alle Themenkreise ab, die für den Ein¬ 
steiger wichtig sind. 

CPC 6128 für Einsteiger 
215 Selten, DM 29,- 



BASIC macht Spaß. Man muß es nur richtig 
erklärt bekommen. Und genau das tut das 
große BASIC-Buch zum CPC 6128. In die¬ 
sem Buch steckt mehr als Einsteigerwis¬ 
sen; Variablen, Zahlensysteme, Bits und 
Bytes, Tokens, Stringbearbeitung, Sortie¬ 
rung, Laufschrift, selbstdefinierte Zeichen, 
Windows, Fehlerbehandlung, Kopierschutz, 
Grafiken, Soundprogrammierung, relative 
Dateien... Das verstehen wir unter Vielfalt. 
Das große BASIC-Buch zum 6128 
276 Selten, dm 39,- 



Dieses Buch ist für alle, die bisher dachten, 
spektakuläre Grafik auf dem CPC sei nicht 
möglich. Zwei Top-Autoren beweisen das 
Gegenteil: Mit CPC-Chart - dem Dia¬ 
grammgenerator, mit Destroyed - dem 
Arcade-Game, mit CPC's World - dem 3-D- 
Animations Programm, mit dem Zeichenpro¬ 
gramm, mit Vektorgrafik, mit Sprites... Ja, 
Sie haben richtig gelesen; Wir reden von 
den Grafikmöglichkeiten Ihres CPC - inklu¬ 
sive 6128 und Joyce. 

Das große Grafikbuch zum CPC 
Hardcover, 589 Seiten, DM 49- 



Wer seinen CPC wirklich beherrschen will, 
der muß sich mit dem Thema Maschinen¬ 
sprache beschäftigen. Von den Grundlagen 
bis zur Programmierung des Z80-Prozes- 
sors. Das Maschinensprachebuch zum CPC 
hilft Ihnen von Anfang an. Mit einer 
genauen Beschreibung aller Befehle und 
ausführlichen Beispielen, mit Hinweisen 
zur Benutzung der Systemroutinen und 
einem Assembler/Disassembler sowie 
einem Monitor zum Abtippen. So macht der 
Einstieg Spaß. 

Das Maschinensprachebuch zum CPC 
330 seifen. DM 39,- 


•WW+W-+4k+fH-f * 

BKUCXMAHN SCHIEB 


jl-fTH-ii:.i-- • 

BHllCKMANN ENBU9CH 

; 

DAS GROSSE 


OERIES STEIGERS 

FLOPPY 


CPC 

BUCH 


664/6128 

DISIfTTE««0GflAMIIIEmiN6 (DR 
EWSniOR. FMTKSQIHiniNi UND 


INTERN 

PROFIS MIT OEM CPC 



EIN DATA BECKER BUCH 

Ul 

r 

EIN DATA BECKER BUCH 

- :: . . :: : i 




Was man alles aus der DDi-1 des CPC 464, 
CPC 664 und CPC 6128 holen kann, zeigt 
dieses Buch auf eindrucksvolle Weise. 
Neben den nötigen Erklärungen und einem 
ausführlichen DOS-Listing gibt es zahl¬ 
reiche Utilities: eine komfortable Dateiver¬ 
waltung, einen Disk-Monitor und einen 
Disk-Manager. Selbst CP/M-Grundlagen 
und die relative Dateiverwaltung werden 
erklärt. So findet wirklich jeder CPC-Besif- 
zer in diesem Buch einen wertvollen 
Ratgeber. 

Das Floppybuch zum CPC 
422 Selten, DM 49,- 


Blicken Sie hinter die Kulissen des CPC 
664 und des CPC 6128. Kaum ein anderes 
Autorenteam hat sich so intensiv mit die¬ 
sen Rechnern auseinandergesetzt: vom 
Prozessor bis hin zum speziellen Schnitt¬ 
stellenbaustein. Alles wird erklärt und 
dokumentiert. Natürlich auch das Betriebs¬ 
system mit all den wichtigen Facts und 
Hinweisen, die man braucht. Hier finden 
Sie die Informationen, die ein Profi von Pro¬ 
fis erwarten kann. 

CPC 664/6128 Intern 
456 Selten, dm 69,- 


Wer einen Joyce gekauft hat, der möchte 
möglichst schnell und effektiv mit diesem 
Rechner umgehen. Joyce für Einsteiger 
wird dieser Anforderung voll gerecht. Von 
Kleinigkeiten wie dem Anschluß des 
Gerätes oder dem Kopieren der Systemdis¬ 
ketten bis hin zur optimalen Arbeit mit 
LocoScripf finden Sie hier alles Notwen¬ 
dige. Dazu eine kleine Einführung in BASIC 
und LOGO und natürlich in das Betriebs¬ 
system CP/M-Plus. 

Joyce für Einsteiger 
248 Seiten, DM 29,- 


Von der Textverarbeitung zum Program¬ 
mieren - das bietet Ihnen das große Joyce 
Buch. Hier werden alle Themen abgedeckt, 
die für den Joyce Nutzer interessant sind. 
Spezielle Anwendungen mit LocoScript. 
Personalisieren des Systems mit CP/M, 
Muifiplan auf dem Joyce, Uhr im BASIC, 
Grafikprogrammierung in LOGO und viele 
andere interessante Themen warfen auf 
Sie. Im großen Joyce-Buch. 

Das große Joyce-Buch 
Hardcover, 362 Seiten, DM 59,- 






DATA BECKER Führer 
zu Schneider CPC 
ca. 180 Selten 
DM 19,80 


DATABECKER Führer 
zum JOYCE 
ca. 160 Selten 
DM 29,80 



DATA BECKER Führer 
zu CP/M 
139 Seiten 
DM19,80 


DATA BECKER 

Merowlngerstr. 30 • 4000 Düsseldorf -Tel. (0211) 310010 



DATA BECKER Führer 
zu TURBO PASCAL 
126 Sehen 
DM24,80 
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[—Händlerverzeichnis 


Berlin 


Hamburg 


Würzburg 



Schöneberger Straße S • 1000 Berlin 42 • Tel. 030-732 91 90/60 




HALLER GmbH. Würzburg 
dar Spezialist für alle Schneider-Computer. 
Hardeara - Safleara - Zubehör - Service 
Büttner Str. 29 (hinter Kaufhaus Hartle) 
Telefon: 0931/16705 


Schweiz 


Elektr. + elektronische Geräte, 
Bauelemente+Werkzeuge 

ELECTRONIC VON A-Z 

Stresemannstr. 95 • Berlin 61 
Telefon (030) 2611164 



Thörner's 

Büro Ä^rLaden 

Das Fachgeschäft speziell lör „ausgefallenes" Computer-Zubehör. 


Mit BeratunQl Riesenauswahl ,.. -j- 



Unverbindlich 'mol relnachauenl Sie werden überrascht seinl 

B 62, Innsbrucker StraDe 66 n na M nn Eine Filiale dsr Firma 

am Bayerischen Platz / 04 4U 3£ Bürobedarf Thörner 


Löhne/Ostwestfalen 


lih Schneider Vertragshändler & ServicBcenter 
I Hard- & Software von A-Z tür Ostwestfalen 

"V° FRITZ IBERMEIER 

A *Computer*HiFi*Video‘TV* 

alles für Schneider vom 464 - Joyce 

hi ÜHptiWU • IIMifUr M • 407? UlM I ■ TU, IB7I2/1248 


Nürnberg 


Zürich 



Computers 

zentral in Seebach, Schaffhauser Str. 473. 8052 Zürich, 
Telefon 01-302 2600 

_ Ve rsandkatalo q a nfordern 



Hochslraße 1 1 


Bonn 


Iradio- 

HIFI-VID 


oio NSEH %2^ 


SERVICE SERVICE SERVICE SE RVK I 


Plittersdorfer Straße 206T elefon (02 28) 36 40 29 


Castrop-Rauxel 


Elt GUTE IDEE NACH DER AICEREN 

Schuster Electronic 

I COaWTEUl IN JUCHCK CCMPUTfP I «LECTI 

Schneider 

roftpu.-ffowisw 

Vertrags handlet 

ft Commodore 

Vertrags werk stall 

Obere Münsterstr.33 4620 Castrop - Rauxel (02305)3770, 



C"-iCompu1ers1ore> asoo Numbero eo 

----- - - Tel 0911/289026 

_C^Schneider_ 

9 conpuiEnomion 

Wir fuhren zu den original SCHNEIDER-Produkten Software, Bücher und 
Zubehör verschiedener Firmen wie DATA BECKER VORTEX, CUMANA, 
ISS, RUSHWARE, MARKT & TECHNIK SYBEX, VOGEL-Verlag usw.l 



Steinfurt 


ATARI SCHNEIDER STAR NEC SEIKOSHA PANASONIC EPSON 


omputer 
©üromaschinen 


ervice 


Tel (02551)2565 


CBS GmbH Tecklenourgor Sir 27 4430 Steinluri 


Düsseldorf 


Vellmar 


Schneider 

rnmoi itizo rm nrinN 
_ l u i nu i Ci\ uns t Di ui i 

Beratung ^ s ^ ' ^ 

Vertrieb 
Service 

BÜRO-ORGAN ISATON OATENIECHNIK VenneBsgesellschall mbH 
4000 Ousselöorl I FneCensiraflo 13 Tel 0211/3080 71 



Schneider 

Division 



iroelec^ronlc , 

Holländische Str. 121, 3502 Vellmar, Tel.: 0561/8281 60 


Eintragungen 
im Händlerverzeichnis, 
nach Städten geordnet, 
kosten je mm Höhe 6, - 
DM bei einer Spalten¬ 
breite von 58 mm. 

Einträge möglich 
mindestens 
6 x innerhalb eines 
Insertionsjahres. 

Nähere Informationen: 

Wolfgang Schnell 
Telefon (0 5651) 87 02 


Anzeigenschluß 
für die 

Ausgabe 4/87 
von 

PC Schneider 
International 
ist der 

18.2.87 

Erscheinungstermin 
ist der 

25.3.87 


160 PC 2’87 








































































Kleinanzeigen—| 


Achtung! 

An alle CPC-User-Clubs! 
Suchen Sie noch Mitglieder 
oder wollen Kontakte zu 
anderen CPC-Usern oder 
Clubs knüpfen 
Dann schreiben Sie uns 
doch einfach. Wir veröffent¬ 
lichen Jede Anschrift eines 
CPC-User-Clubs gratis! 

Falls auch Ihr User-Club sich 
einmal vorstellen möchte 
(evtl, mit Foto), nutzen Sie 
unsere Zeitschrift als Ver¬ 
bindungsglied und Kontakt¬ 
adresse! 


Das tapfere Schneidertein sucht noch Mitglieder 
Marcus Odorfer Kian Ghanai 

Erlenstraße 13 Im Steller Sande 69 

2800 Stuhr 2 Groß Mackenstedt 


Hilfe! 

CPC 664-Besitzer sucht Kontakt zu anderen An 
wendern, Großraum Baiersbronn/Freudenstadt. 
Bruno Gaisen 
Höllweg 117 
7292 Baiersbronr 


Schneider PC 1512-User sucht Kontakte zu 
anderen PC-Besitzern zum Software und Er¬ 
fahrungsaustausch 
J. Lauterbach 
Richthofenhöhe 8 
8580 Bayreuth 


Schneider PC Club Worms 
für 1512 geplant. 

Wer hat Interesse (auch Umgebung) 
bitte melden bei: 

Ulrich Gerhardt 
Wormser Landstr. 129 
6520 Worms 22 
Tel (06241)33043 


REMBOX - Recklinghausen 

02361-373214 

300 Baud 

8 Datenbils, 1 Stopbit, keine Parität 
24 h Online 


Byte Nibbler Dudelange 
SCHAEFFER Claude 
36, rue Cungs 
L—3446 Dudelange 
oder 

Byte Nibbler Dudelange 
DUPONT Yves 
94, av G.D Charlotte 
L—3440 Dudelange 


Computerclub MAGIC KEY 

sucht noch Mitglieder im Raum Bremen 

Regelmäßiges Clubtreffen!!! 

Info bei: 

Michael Hollmann 
Starnberger Straße 46 
2800 Bremen 1 
Tel (0421)373700 


Schneider PC User Group e V 
Maren Wanner 
Limesstraße 26 
8000 München 60 


Clubbildung im Raum Ibbenbüren angestrebt. 

Kontakt zu CPC 464/664/6128 Usern gesucht. 

Severin Dreker 

Tecklenburger Damm 16 

D-4530 Ibbenbüren 1 

Tel. (05451) 16608 


CPC-Ctub Buchholz 1 sucht noch Mitglieder 
aus ganz Deutschland! 

Infos bei: 

Oliver Scheller 
Feldstraße 36 
2110 Buchholz 1 

Bitte ausr frank Rückumschlag beilegen. 


Schneider-PC-User im Raum Bremen sucht 
Kontakt zu anderen PC-Usern (auch im ge¬ 
samten Bundesgebiet) zwecks Erfahrungs¬ 
und Softwareaustausches und eventueller 
Clubgründung 

Interessenten bitte melden bei: 

Oliver Plaehn 
Schulstraße 338 
2811 Martfeld 
Tel (04255)578 


Schneider USER Club »die Freaks« suchen 
noch Mitglieder die beim Aufbau des Clubs 
helfen Wer Interesse hat meldet sich bei: 
Andreas Gahle Michael Meuser 

Am Vogelsang 27 Am Vogelsang 14 

5140 Erkelenz 4 5140 Erkelenz 4 

Tel (02935)2518 Tel. (02435) 2565 


CPC User-Club Düsseldorf sucht noch weitere 

Mitglieder 

Bitte melden bei: 

Robert Ban 

Haus-Endtstraße 149 a 
4000 Düsseldorf 13 
Tel (0211) 715919 


Wer interessiert sich für die Clubgründung ei¬ 
nes Joyce Computerclubs Schweiz, oder ist 
auch allein mit seinen Software-Problemen? 
Interessenten melden sich bei: 

Michael Haueter, 

Nussbaumweg 3, 

CH-5742 Kölliken/AG 
Tel. (064)432286 


Joyce-Benutzer in Oberösterreich - schreibt 
doch einmal zwecks Erfahrungsaustausch an: 
Stefan Brunner 
Zaubertal 3 
4320 Perg 


Kontakt zu CPC-User in Österreich (Tirol) ge¬ 
sucht. 

Winderl Werner, 

Salzbergstr. 89, 

A—6060 Absam 
Tel. (05223)421 76 


1. Joyce-Neuling sucht Kontakt zu Joyce-Club 

2. Wer gründet mit Joyce-Neuling einen Joyce- 
Club im Raum Stuttgart. 

Michael Krüger 
Sankt Pöltener Str. 19a 
7000 Stuttgart 30 


Biete an Software 


VEREIN-BEITR.-ADRESS.-VERWALT. 
ALTERSSTATISTIK EHRUNG.1200mtg 
mit u. ohne SPARTEN. IBM-KOMP 
GW-BASIC erfordert. DISK: 127 DM 
Rolf Wendlandt, 

Beckerskamp 25,4300 Essen 14 


* GESCHAFTSPROGRAMMPAKET!!! * 
Fakturierung, Datenbank usw., f 
664/6128 u. Epsondrucker, Orig. 20 DM 
Tel (07355) 1285 ab 14 Uhr 


Viele preisw. Progr von 2-28 DM 
(z.B MINIVISICALC, TOTO) für 
CPC 464, 664,6128 Kat. 1 DM von 
SCHNEIOERSOFT Andreas Wagner, 
Gartenstr. 4,8201 Neubeuern G 


■ Turbo-Pascal-Maskengenerator 

■ Masken direkt am Bildschirm 

■ erstellen, Aufruf durch INC- 

■ Datei, für IBM-Kompatible 

■ Rolf Ellermann 4840 Rheda-WD 

■ Postfach 1406 98 - DEMO 15- 

■ per Nachnahme o Vorauskasse 


AORESSVERWALTUNG 

für 1127 Adressen - mit Identifikatoren - Druck 
routinen - großer Suchkomf. DM 50.- 
wir erstellen 

SONDERSOFTWARE 

HESCHCOM, 

Weichselgartenstr 13,8 München 71 G 


A P O S Textprogramm 

Linker Rand, fett bzw. unter¬ 
strichen auf dem Bildschirm zu 
sehen Insert, Word wrap, 
RECALL etc Gute Datensicher¬ 
heit Das APOS Textprogramm 
macht endlich Schluß, mit dem 
Schattenboxen! 


464 C (Cassette) 

70,00 DM 

464 D Disk 3" nur 464 

80,00 DM 

664 (664 oder 6128) 

80,00 DM 

Listing 

40,00 DM 


☆ 

PICO - FORM 

☆ 

* 

Textverarbeitung 

☆ 

☆ 

Textarithmetik 


☆ 

Karteiverwaltung 

☆ 

■ir 

DREI PROGRAMME IN EINEM! 

☆ 

☆ 

Für CPC 464,664,6128 

☆ 

☆ 

P1C0S0FT-EINFUHRUNGSPREIS 

☆ 

☆ 

Kassette, Disk 3” • 5 1/4" 

☆ 

☆ 

DM 59,- 

* 

☆ 

GRATISINFO - LIEFERUNG 

☆ 

☆ 

Dipl. Ing Klaus Firnhaber 

☆ 

■ü 

Rehmkamp 8, 2300 Altenholz G ☆ 


AKTIENANALYSE/DEPOTVERWALTUNG 
Balken-, Liniengrafik, 
gl Durchschnitte für 464/664/6128 
Info 2,-DM. Disk 79,50. 

Dieter Borchers, Schönstedtstr 6, 

1000 Berlin 44, Tel (030) 6870850 G 


Orig. Star Writer V3.0120 DM (0 52 31) 2 43 74 


Aurel Jahn Datentechnik 
Heinheimer Straße 20 
6100 Darmstadt (06151) 71 8817 G 


☆ NEU-fr mak-LERNSOFTWARE CPC ☆ 

Für Schule. Studium und Praxis! 
LERNSOFTWARE: Chemie/Physik/Ing 
Malhematik usw./Info 2,- DM Bfmk 

☆ U. Hox, Ackerstr, 65,4190 Kleve G ☆ 


dBase 2 • DM100,- ■ Tel (0931)49200 


WINCHART f. SCHNEIDER PC 

Das Spitzenpr. für die Aktien¬ 
analyse z B Linien, Balken, 

P&F Charts, Indikatoren, Fenster 
in belieb Größe u Anzahl 
865,- DM Grafisinfo W. Schmitt 
Brunhubersti. 118,8090 Wasserburg G 


Dias ordnen mit CPC/JOYCE/PC 
25000 Dias (bei PC 100000 Dias) 
können gespeichert werden 
Suchzeit 1 Sekunde. Info bei: 

Dipl.-Ing W. Grotkasten, 

Birnenweg 6, 7060 Schorndorf 

Tel. 0 71 81/4 28 46 G 


ACHTUNG JOYCE-BESITZER! 

**** JOYDISK **** 

Endlich das Programm, das Ordnung in 
Ihre JOYCE-Disketten bringt! 

Erstellt und druckt Disketleninhaltsver- 
zeichnisse in übersichtlicher Form mit 
Erkennung von Locoscriptdisketten, die 
auch als detailliertes Inhaltsverzeichnis 
mit den Textidentifikationstexten 
gedruckt werden können! 
Gerätevoraussetzung: JOYCE mit 512k 
Kurzbeschreibung im trank Rückumschlag 
Lieferung: 3-Zolldisk mit aust Bed.anl 
gegen Verrechnungsscheck über DM 53,— 
Ernst-Otto Dumke 

Amselweg 2,6087 Büttelborn 2 G 


☆ JOYCE • NOTIZBLOCK/KARTEI ☆ 
VERBESSERTE VERSION (CPC 1'86) 
z.B. Index u Suchwörter drucken 
suchen u. drucken gleichzeitig 
INFO Rückporto, 6 Frankfurt 60 
R Sprunkel, Freizigrathstr. 43 


dBase II und Junior dBase II 

sofort benutzen und anwenden 
mit PC, CPC, Joyce und Joyce+: 
neue menügesteuerte, flexible 
Benutzeroberfläche varDAT II 
mit 25 Kommando-Dateien für 
suchen, sortieren, listen, update 
ändern, Serienbrief, Aufkleber 
usw.... auch mit Festplatte 
universell einsetzbar 
Formal: MS-DOS, 3" oder Vortex 
Disk,Handbuch im Schuber zum 
Einführungspreis, einschl MWST 
von nur 199,- DM im Fachhandel 
oder +10 DM (NN) von SOFTDESIGN 
Bleichstr 25,4040 Neuss 1 G 


Wordstar 3.0 mit Handbücher für 
Schneider Joyce gegen Gebot 
Dillmann, München, Tel. (089) 9390 65 


MS-DOS-FREE-SOFTWARE: Bei uns 
können Sie FreeSoftware mieten 
und selber kopieren. HITPARADE 
(30 Disk.) TOP-40 aus der PC- 
SIG für DM150,-. 

Info anfordern (1 DM Briefm.): 
EDV-Beratung Joseph Gebhardt, 

PF 1174,8458 Sulzbach-Rosenberg G 


FREIPROGRAMME - IBM/KOMPATIBLE 

5 1/4" Disketten unter MS-DOS 
10 Disk 98,- 50 Disk 348.— 

20 Disk 168 - 100 Disk 547,- 

30 Disk 237,- 100.. Anfrage 

Demodisk und Katalog kostenlos 
Computerservice - D. Hafemann 
Donaustr 44,4040 Neuss 21 G 


STEUERTABELLE 1987, Monat-Woche-Tag, 
inkl. Sozialausg u Nettolo 
Kass. 20 DM, Disk. 30 DM geg Vorkasse 
Peter Brämer, 

Lindener Str 117,4630 Bochum 5 


# NEU # # VIDEO-ARCHIV # # NEU # 

Programm zur Erstellung eines 
VIDEO-Archivs mit Etikettenausdruck 
tür Ihre Videocassette. 

Für CPC 464+DD1- 664 oder 6128 
DM 70,- Ohne Etiketten-Drucker 
DM 60,- Bestellung ab 18.00 Uhr 
Tel: (071 46) 43520 G 


Keine Zeit für dBase II! Joyce 
verk. orig. dBase Il-Diskette 
+ Arbeitsdisk. + Handbuch 
160,- DM per NN 
Peter Kuhn, Tersteegenstr. 6 
5220 Waldbröl, Tel. (02291) 3328 


Texpack u. Übungsdisk 
inkl Handbuch DM 140,— 
Niemann, Tel 0 40/5 36 19 72 


2’87 PC 161 



















































I Kleinanzeigen 


☆ JOYCE/PC 1512 * Hard + Sott + Zu¬ 
behör* z B Open Access-Entry 
499,- DM/Star-Writer PC 298,- DM/ 
Access Four 299,- DM/Vortex HD- 
Card 21MB 1388 - DM/Joyce 20MB 
Harddisk WD2000 2188,- DM/Pana- 
sonic KXP1080 614,- DM/KXP1092 
1039,- DM/Disketten + Farbbänder 
zu Superpreisen/GEM Software 
usw. usw. im Gesamtlieferprg 
Mich Mischke Microelectronic 
8384 Unlerhaid 37/T. 0 9954/8 57 G 


■ DISKETTEN 

■ 5 1/4", 48 tpi, DM 0,99, 2D 

■ 3 1/2",135 tpi, DM 3,19, 1DD 

■ auch andere, bes. Garantie 

■ Allg Austro-AG, Ringslr. 10 

■ D-8057 Eching, Tel:0 81 33/6116 G 


Suche für Joyce Mathe-Programm 
»Kurvendiskussion«, Tel (040) 6772627 


■r Freiprogramme mit Garantie -*■ 

Ca 500 Disk der PC-SIG Gruppe 
und andere Super-Freiprogr. 
wie Sprachkurse, File-Manager, 
System-Tests, Banker's Tool, 
Kopierprogramme, Textverarbeitung, 
Datenbanken, Kalkulation, usw. 
bieten wir Ihnen mit Funktionsgarantie! 
Nutzen Sie diese Programme 
für Ihren Schneider PC 
Jede Diskette ab 10,- DMI 
Ruten Sie noch heute Ihr Info Pack 
mit 3 Katalog Disketten gegen 30,-DM 
bar/Scheck von Esser Computer, 

Postt 522,51 Aachen ab G 


An alle CPC-Besitzer! 

Programm-Gratisinfo anfordern bei 
Friedrich Neuper, 8473 Pfreimd 
Postfach 72, Postkarte genügt G 


CPC-Anwender-Software 

z B Text Adressen, Uberschuß, Rechnungen, 

Kasse, Lager, Außenstände 

Info: Fa Grein, Pf 1513, 3550 Marburg G 


MATHEMATIK FÜR JOYCE (Disk 50, ) 
Info geg Porto: Frank Stefani 
Husselmühle, 8102 Mittenwald 


* LOHN-UND EINKOMMENSTEUER * 

Suoer Jahresausgleich+Sleuerkl.-wahl+Renten 
ertrag+Analyse! Für * CPC’s+IBM ’ Cass. 60,— 
Disc. 70,- DM! Info gg RP Jährl Aktu 10,- DM! 
Horst liehen, Niederfelderstr. 44.8072 Manching, 
lei (08459) 1669 G 


Komplette Hausverwaltung für 1 - 150 

Wohneinheiten, mit Nebenkosten¬ 
abrechnung Info: Klaus Frank 
Friedhofstr. 26,7101 Löwenstein 


☆ 

Wirtschaftliche Programme 

☆ 

☆ 

für die Arztpraxis auf 

☆ 

☆ 

dem Schneider CPC & Joyce 

☆ 


Fa. EFFEKTA, Am Wiggert 9c 

☆ 

☆ 

45 Osnabrück, 0541-422 416 G 

☆ 


Lohn-Einkommensteuer Progr. 86 

CPC 3" Disk Ber + Speich + Ausdruck 
DM 56,- an A. Frydman, Wilh Buschstr. 18 
5000 München 71, Listing DM 15,- G 


Freiprogramme für PC 1512 

über 700 Disketten 8,-DM/Disk 
PC-SIG-Kat (3D) 10,-DM Lindmeier 
Fichtenstr., 8312 Dingolfing 


■ JOYCE-ORIGINALSOFTWARE ■ 

■ dBase I1125,- M+T Fakturier. 50,- ■ 
■Business-Pack (Adr./Rechn /Lager) 175,-■ 

■ Daniel Sillescu (0 61 31) 47 28 88 ■ 


Endlich neue JOYCE-Spieleü 


Strike Force Harrier (3-D Flugsim.) 59.90 

Classic Collection (3 Arcaöe-Spiele 
auf einer Diskette) NEU 45,90 

Bounder (Spielhallenhit!) NEU 39,90 

Tomahawk (3-D Hubschrauber-Simul) 59,90 
Batman (3-D Action-Adventure) 47,90 

Fairlight (3-D Grafik-Advenlure) 47,90 

Aftershock (engl Grafik-Advent) 52,90 

Public Domain Software je Disk 29,90 

Diskettenbox f 40 3-Disks nur 33,90 

Leerdisketten 3“(Markenfabr.) nur 9,90 

Eine ausführliche Liste gibt’s bei 
SUNSHINE-Software Ad Schilde 14, 


5270 Gummersbach, Tel 0 22 61/7 57 52 
** Direkt in Luxemburg 
unter Tel. (0 03 52) 81 82 12 ** G 


Software für Joyce! 
schnelle Lagerverwaltung für 
alle Branchen DM 299,-, 

Fakturierung für Kundendienst¬ 
betriebe und Freiberufler mit 
Lagerverwaltung in dBase, 
ohne dBase DM 199,-, mit dBase DM 399,-, 
Individualsoftware 

und dBase-Programmierung auf Anfraoe, 
Tel. (0 68 51) 57 27, 

Micro Data, Pf 1673,6690 St. Wendel G 


Prompt/-Druck, 50,- DM, Tel (0 23 30) 50 56 


☆ ☆ * APFELMANN-GRAFIK ☆ ☆ ☆ 

schnellstes und vielseitigstes 
Programm jetzt für alle CPC’s! 

Kass 20-,Disk. 30,-,Vorausz 
Gerhard Knapienski 
Fraunhoferstr. 8, 3 Hannover 1 
Postgirokonto Han: 47 11 13-309 


SOFTWARE - VERMITTLUNG 

Kauf und Verkauf 
Privat & Kleingewerbe 
Into: Bernd Terwerth, Scharmannstr. 3a, 
4050 Mönchengladbach 2 G 


M&T • Fibu für Joyce 

DM 130,-, Tel (09971) 1454 


Disketten z.B 5 1/4“ ID 100/79,-DM 
5 1/4" 2D 10/10,90 DM 100 / 99,- DM 
3 1/2" 2DD 10/ 39,90 DM 100 / 360, - DM 
3“CF2 MAXELL 10/ 86- DM 
CPC-Zubehör u. Programme (Liste) 

ESBW 3540 Korbach 24, Vor den Eichen 11, 
Tel (02982) 1263,14-20 Uhr G 


GRATISINFO für jeden CPC anfordern 
bei Friedrich Neuper 

8473 Preimd, Postfach 72 G 


☆ ☆ ☆ ☆ Machiavelli ☆ ☆ * ☆ 

Politik, Wirtschaft und Strategie 
erstes kombiniertes Simulationsspiel 
Ein komplexes Szenario entsteht im 
Zusammenspiel von Computer und Spiel¬ 
brett 2-4 Akteure kämpfen um Macht! 
Börsenanteile, Ölverknappung, Kriege, 
Verträge etc schaffen immer neue 
Situationen im Kräftespiel um Länder. 
Ölquellen, Pipelines, Ölhäfen etc... 
für Joyce 89,90 DM Disk + Spiel INFO 
Perin, Luisenstraße 37, 5100 Aachen G 


Das Super Angebot 
COMTEC 51/4“ 

2D, Double Sided, double Density, 

10 Stück 45,- DM 

3“ Disketten Maxell CF2,10 Stück 77- DM 
IBM und Kompatible an CENTRONICS 
Abgeschirmtes Rundkabel Professionelle Qualifät 
- Standard-Belegung mit Reset-Leitung geschaltet 
Abgeschirmte Stecker ■ C-Pins vergoloet ca. 1,8 
K&R Compulershop, Friedrich-Wilhelm Straße 48 
3440 Eschwege 


Biete Hardware 


Farbmonitor für Schneider PC/CPC, 
neu mit Garantie, VB 480,— 
lei: (0241) 82339 (wochentags) 


Der AMSTR-SCHNEIDER-USER-CLUB- 

AACHEN bietet nun allen Usern: 
DFU-Ratgeber auf Disk 

19 DM 

org INTIM-SOFT Disk. 

29 DM 

CPC - Druckerkabel 

29 DM 

5 Stk 3" Markendisk 

39 DM 

CPC 6128 grün 

939 DM 

PC 1512 MM SD 

1879 DM 

VORTEX 20MB-Drivecard 

1.299 DM 

Liste gegen 1 DM in Briefmark 
Versandpauschale 

Lieferung nur gegen V-Scheck! 

4,50 DM 

A.S.U.C.A. Tel.:(02451)4 6608 

Zeißstr. 7 5132 Ub-Palenberg G 


CPC 6128 Grünmonilor 2 Laufw., 
MP2, Datenrekorder, Druckerkabel 
10 Leerdisk, sowie Massen an 
Original-Anwender- und Spielesoftware 
Heut Neupreis 3650,- VB: 1700,— 
Tel.: (040) 249832 


Verkaufe CPC 6128 mit 5 Monaten Garantie 

+ Druckerkabel + 11 Disks 

mit Supersoitware * (0 73 71) 61 24 


Joyce wegen Systernwechsel mit 
viel Software (059 52) 842 n 18 


PC 10, 640 KB RAM, 2x360 KB Disk 
MS DOS 2.11, Mit Star-Drucker 
SG 15, Komplett DM 3800,— 

Telefon ab 18 Uhr (074 36) 1614 


Neu BERLIN - SOFT Neu 
präsentiert 

Die SUPER Soft- u. Hardware-Show 

Es gibt fast nichts, was wir nicht liefern 
Sofort Katalog A3 anfordern gegen 
Schutzgebühr von DM 2,50. 

Unser Angebot: 

B-S-L / PC & AT compatible 
B-S-L / PC 640 KRAM (256K bestückt) 
B-S-L / PC mit 1 Laufwerk DM 1698,— 
B-S-L / PC mit 2 Laufwerke DM 1898,- 
B-S-L / PC 20 MB Platte 1 LW.DM 2998,- 
B-S-L/ Filecart20MB DM 1398,- 
B-S-L / AT und Zubehör auf Anfrage. 
Bequeme Finanzierung durch SKG Compulercredit. 
Und jetzt der Knüller: Unter je 500 Einsen¬ 
dern wird bis zum 30.1.871 DATAPHON S21 
D verlost Der Rechtsweg ist ausgeschlossen 
Brief sofort an: BERLIN - SOFT 
M LAST 1000 BERLIN 47, STR 231 NR 116 G 


CPC-464 mit 128K, IBM-Gehäuse, 
Vortex FIS, Hitachi 3", Software 
und Bücher, Zeitschr. 40 Stck. 

VB 2000,- DM, Seiko 500 CPC, 3 Mon 
Garantie 320,- DM, (071 62) 2 4211 


Laufwerk 5,25“ Vortex F1-Z 
ungebraucht incl Softw. DM 400,- 
(Neupreis DM 698.-) Tel (061 33) 2964 


CPC 664 + Grünmon + je ein Jahrg 
zweier Zeitschr. + Software 
Tel. (0911)694260 


BTX-Modulf C 64/128+PCs 300,- DMGSG 
5143 Wassenberg 123 CPC, Info 5,- DM. 


Drucker Seikosha GP500 

200 - DM 

Dataphon S21D 

190 - DM 

DFÜ-Progr. Unicon 


incl. Schnittst 

70,- DM 

(09365)3745 ab 19 Uhr 



Drucker NEC80 23 BN, Centronicsport, 
wie neu, DM 600-, Tel. (0931)49200 


Zweitlaufwerke für alle CPCs 
inclusive Buskatiel + Netzteil 
in formschönem Gehäuse 
3" = 299,- DM / 5,25" = 399,- DM 
Tel (04442) 6320 oder 4905 G 


CPC464 CPC664 CPC6128 User! 
Lichtgriffel mit Programmen 
und dt Anleitung nur DM 49,- 
Versand gegen Scheck/Nachnahme 
Info gratis! Fa Schißlbauer 
Postfach 1171S, 8458 Sulzbach 
Tel: (096 61) 65 92 bis 21 Uhr G 


CPC 464 u. Farbmonitor CTM 640 
einzeln o. zusammen zu verkaufen, 
Preis VS, Tel (02306)61983 


Malrixdrucker NEC P7 (DIN A3) 
Centronics + Seriell, neu. 
noch nicht gebraucht, NP 2198,— 
für DM 1650 - Th. Eckel, 
Hahnrodsweg 6.3560 Bid -Wallau 


JOYCE /PLUS 
Speichererw. 99,- 

von 256 kB auf 512 kB 
Aufrüstsal? mit ausführlicher 
Einbauanleitung für Laien 
Tel.:(04721)22299 

COMPUTER-TEAM 
2190 Cuxhaven 1 

täglich von 16.00 bis 2000 Uhr G 


Verk 51/4 Zweilfloppy +12 Disks 400,- DM 
u außerö 7 Bücher + 13 Spiele von 6-20 DM 
(alles CPC 464) 

Infos: (07971) 4637 ab 17.15 Uhr 


CPC 464 (3 Mon )+DDI-1 (1 Mon) + 
Bücher, 790 DM, Tel (0711)362666 


☆ * ☆ SCHECKKARTEN ☆ ☆ ☆ 

☆ Leser + Schreiber 12 Volt-TTL ☆ 

☆ Ausg 150-DM, Tel (09721)261 23 * 


Verk MP2 Neu 90,- DM • lei (0209)434 76 


★ * ★ SONDERANGEBOT ★ * ★ 

CPC464, grün + Drucker NLQ401 + Zub 
+Softw. 7 Bücher (NP DM 2100,-) für 
nur DM 900,- umst h abzg. 

Schreiot an: M Kanitz, Rheinbrückstr. 35, 
7880 Bad Säckingen, Tel (07761) 1694) 


CPC 464 grün + Software VB 500,- DM 
C. Blaswich Tel (0281)50602 


Verkaufe: CPC 464 grün, 15 Spiele + 
ca 25 Proar. + Buch 6 Mon. alt 
* für ca 600 DM' VHB * Tel. (0 68 81) 8 71 71 


5 1/4" Zweitlaufwerke-anschlußferlig 
mit Gehäuse/Netzteil/Kabel/Garantie 
Für CPC 464 DM 390,- 

Für CPC 664/6128 DM 380,- 

5 1/4" Laufwerk, wie oben, aber 
mit 2 x 40 Track (verwendbar in 
IBM-Kompatiblen) und man 
Seitenumschalter. Autpreis DM 50,— 
Gehäuse, Netzteile, Floppykabel 
(auch für Hitachi 3"), 

Einbaulaufwerke, usw. 

in meiner kostenlosen Liste 

Jürgen Merz - Elektronik 

Lengericher Str. 21.4543 Lienen 

Tel (05483) 1219 + 8326 G 


CPC 6128 grün, Riteman F+ 

Druckerkaoel 2m, 21 Disketten 

Prog: TOMAHAWK. ELITE, WAY 0FI HE TIGER 

Tel. (053 57) 1273 
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Kleinanzeigen—| 


Schneider PC • Neue und gebrauchte CPC 
Hardware Joyce • Flopp/ • NLQ ■ Drucker • 
Software für Finanz-Lohn- und Immobilienver- 
waltung/vermittlung • Abrechnungsprogram¬ 
me für Ärzte Rechtsanwälte • Handwerker - 
Speditionen KFZ-Handel, Schornsteinfeger, 
Manfred Kobusch, Bergenkamp 8,4750 Unna, 
Telefon (0 23 03) 1 33 45 G 


CPC 6128 grün, 2- Floppy NLQ 401 
dBase II, Multiplan. Wordstar+Handbucher, 
10 Disketten, M&T-Literat 4 Mon. alt, 
wg. Systemwechsel, DM 1800,— 

Tel (06074)27696 


MODULATOR f alle CPC 89,-. □ 
Fertiggerät mit Kabel, Anltg./M Leinen, 
PF 6752,33 Braunschweig/Per NN, 
Postkarte genügt / (Prospekt möglich) G 


CPC 464 Grün+VORTEX 64K+DDI-1 
+ NLQ 401 + Traktor + Literatur + Disks 
+ Papier + Abdeckhauben: 1750,- DM 
Tel (091 33)5347 


Joyce Plus, Literatur, Pascal 
Mfr.Small-C.CBASlC, Turbo- 
Pascal, Toolbox Database, 

Original-Software, Computer und 
Software nur wenige Monate alt 
wg. Systemwechsel an Hobbyprogrammierer 
oder Freak zu verkaufen! 

Tel. (0 68 51)57 27 - VB 1800,- DM 


CPC 664 + Farbmonitor + Disk. 
+ Zubehör zu verk, Preis VHB 
Tel. (095 47) 6463 


STAR SG10 + Kabel für CPC 464/ 

664: 480,-DM Tel (05521) 5699 


3“ - Zweitlautwerk für CPC 464/664/6128 
Komplettgerät, 

anschlußfertig montiert, einschließlich 
Gehäuse, Kabel und Netzteil für 


CPC 464 DM 269,- 

CPC 664 DM 259,- 

CPC6128 DM 269- 

Kabel, 

für CPC 464 DM 39.- 

CPC 664 DM 29- 

CPC 6128 DM 39,- 

Gehäuse mit Netzteil DM 89,— 


G+K electronic 

6759 Hefersweiler, Seelenerstr. 4 
Tel (0 63 74) 68 78 oder (0 63 59) 25 82 G 


CPC 464 Grün + NLQ 401 + Floppy + MP1 
+ Wordstar/Tasword/Statistik-Star 
-t- viele Spiele + Programme + Bücher 
= VB 1100,- Tel (08231)4939 


CPC 464 mit Floppy, Farbmonitor 
Viele Bücher und Software 
für alle Bereiche in großer Auswahl 
im Wert von 

2800,- DM für nur VB 1.700,- DM 
Tel (06 21) 37 4108 ab 1800 Uhr 
in 6800 Mannheim 1 


Fischertechnik Computing-Bauk. 

mit Schneider-Interf. + Netzteil, VB 430,- DM 

Tel. (02842) 80575 ab 1400 Uhr 


MIRAGE IMAGER 2 Mon 120,- 

Tel. (0711) 60 5941 


CPC-Int kompl. - Tel (05221) 64048 


464-Color-128KB (SP64) + 2 Laufw. 

(DDI1 + FD1) + NLQ401 + Lightpen 
+ Sprachausg. + DBasell + Textornal 
+ alle CPC International + Spiele 
+ 20 Disk 2100,- DM Tel (089) 7557353 


■ ■ F.E.T. Farb-Videodigitizer ■ ■ 
Digitalisiert das Farbsignal 
einer Videokamera in 16 Echtfarben. 

DM 498,- für CPC 6128 
Creative Video, Postfach 1501 
8520 Erlangen, Tel. (091 95) 27 28 G 


Gelegenheit: CPC 464 + Grünmonitor + Ab¬ 
deckhaube, Schneider DD1 und Vortex 
Fl-Floppy sowie umfangreiche Software: 
15 3-Disk in Box, 12 Databox-Kassetten, 
Schneider-Bücher, Wordstar 3,0 
CPC Schneider International von 3/85 bis 11/86 
wegen Systemwechsel für 1800 DM 
abzugeben (Neupreis 2.900 DM) 

Tel. (0621) 852436 ab 2000 Uhr 


Suche Software 


Suche für den CPC 464 dBase II, 
Multiplan und CP/M 3.0. 

Tausche Spiele. Tel. (08231) 4939 


Suche Bausoltware aller Art 
für CPC 6128 (auch CPM) 
Hans-Peter Heuser, Eichenweg 3, 
6304 Lollar, Tel. (0 64 06) 7 22 02 


Su SW. für Joyce (insbes Turbo Pascal) 
Tel (02330) 5056 


Suche preisw. Standard Softw. 

+ Spiele 1 Schneider Joyce 
B. Merforth, Biberweg 4 
4150 Krefeld, Tel. (021 51) 594053 


Wer besitzt einen COBOL Compiler 
lür CPC 6128 und teilt mir 
seine Erfahrungen mit? 

Paul Kolling, Talstr. 17, 

6689 Wemmetsweiler 


Wer hat »dysys« - Umweltdynamik-Progr. I. Joyce? 

Wer erstellt Interface 1 Fischertech • 
Plotter a f Joyce? ■ C Domes, B-Jäger-Str. 39, 
8092 Haag/OB, fei (0 80 72) 1891 


Suche Hardware 


DDI-1 gesucht incl. Handbuch + Disc. 
Angeö an Tel (0 68 97) 76 52 26 


Schneider PC sucht 04 07 60 73 33 


Suche Commodore SX 64 complett 
R Dombos, 7889 Grenzach/wyl, 
Scheffelstr. 5 


Suche DD1 gebr. oder nur Kontroller 
sowie DMP 2000, U. Klann, 

Ot. Nebenstedt 5a, 3138 Dannenberg 


Tausch 


Biete dBase2 für Joyce, 

suche Wordstar. Telefon: (08856) 9541 


Tausche Software + Anwenderprogramme 
auf Disk/Tape 

J Rodriguez, Krankenhausslr. 56,5030 Hüerth 1 


Tausche Grünmonitor GT64 
gegen Farbmonitor CTM640. 
Aufpreis VB, Tel (04131)63921 


Verschiedenes 


CPC 3/85-9/86 70, - DM Tel. (0 6101) 4 7147 


UNTERRICHT für CPC und Joyce, 
evtl auch PC: (05 61) 31 18 62 


Suche Joyce »Experten« 

der mir bei der Einarbeitung generell und evtl, 
bei der Bearbeitung aushilfsweise unterstützt 
Erstattung der Kosten auf Stundenbasis. A. Pe¬ 
ter, Baden-Baden,Tel (0 72 21)2 36 58 


Fotosatz mit dem 
Schneider CPC 

Vom 464 bis zum Joyce wird Ihr 
Schneider zum Satzgerät, wenn Sie 
mit dem Wordstar arbeiten. Wir 
wandeln die WS-Druckersteuerzei- 
chen automatisch in Satzsteuer¬ 
zeichen um und schicken Ihnen die 
belichtete »Fahne« zurück (1000 
Zeichen Belichtung für 3,- DM) 
Hamburger Satz- 
und Verlagskooperative 
Lindenalle 4, 2000 Hamburg 20 
Tel.(040)435320 G 


Überträge Programme von Cassette 
auf Diskette nur 4,- DM. 

Beides zuschicken an: A. Rodriguez, 
Hauptstr 40, 6361 Niddatal 1 


Das ist 
Ihre 

Chance.... 

schon eine Kleinanzei¬ 
ge bringt oftmals gro¬ 
ßen Erfolg und hilft 
neue Kontakte zu 
knüpfen. 

Nutzen Sie unser An¬ 
gebot und profitieren 
Sie von der Tatsache, 
daß unsere Zeitschrift 

»PC Schneider 
International« 

jeden Monat von 
mehreren zig-tausend 
Computer-Interessier¬ 
ten gelesen wird. 
Möchten Sie etwas 
verkaufen, tauschen 
oder suchen Sie das 
»Tüpfelchen auf dem 
i« - dann sollten Sie 
die eigens hierfür be¬ 
stimmte Bestellkarte 
im Heft ausfüllen und 
an unseren Verlag ab¬ 
senden. 

Ihre Annonce er¬ 
scheint dann in der 
nächsten Ausgabe. 

Wir möchten ausdrücklich 
darauf hinweisen, daß wir 
keine Anzeigen veröffentli¬ 
chen, aus denen ersichtlich 
ist, daß es sich hierbei um 
Veräußerungen von Raub¬ 
kopten handelt. 

Des weiteren machen wir 
darauf aufmerksam, daß in¬ 
dizierte Computerspiele 
nicht in Form von Anzeigen 
beworben werden dürfen. 

Die Redaktion 


Wichtiger Hinweis für Kleinanzeigeninserenten 


Der Verlag behält sich vor, bei Softwareangeboten indizierte Spiele ersatzlos zu streichen. 
Folgende Video- und Computerspiele sind indiziert: 


BPS-Report - Oktober - 5/1986 S 43 


Battlezone 
Beach Head 
Beach Head 
Blue Max 


Desert Fox 
F 15 Strike Eagle 
Green Beret 
Paratrooper 


Raid over Moscow 
Rambo, First Blood Part 
River Raid 
Seafox/Seawolf 


Skyfox 
Speed Racer 
Stalag I 
Tank Attack 
Theatre Europe 


l 
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ABD Computer.121 

Aeti vision.168 

Ariolasoft.51,61 

Byte me.129 

Comal.130 

Computer Max.44 

CSE Schauties.8,147 

CSV Riegert.130 

Data Becker.7,99,159 

DM V.57,69,123,125,141,165 

Dialog Partner.90 

Dobbertin.67 

Eschcomp.67 

Ferdi’s Computer Software.139 

G Computerstore.129 

GAI.43 

Gerdes.74 

Heimcomputer Shop.63,115 

Henschke.46 

Infosystems.117,119 

Innowave Data.2 

Interest Verlag.37 

KHS.153 

Kempenich.74 

Kopisch.110 

Kotulla..H 

MicroMarket Worms.43 

Mükra.23 

Naujoks.139 

N+P Datentechnik.10 

PiZie Data.101 

PR8 Softwaredienst.11 

Prosoft.155 

Rushware.55 

Screens.102 

SFK.10 

SKG Bank.29 

Software Versand Hamburg.9 

Sybex.149 

Syndrom.157 

Schneider Data.107 

Schuster.83,84,85,86 

Star Division.49,73,167 

Star Micronics.40,41 

TG-Soft.143 

Vortex.13,15,137 

Wade.29 

Weeske.144,145 

Werder.9 

Westfalenhalle.118 


Eine Bitte an unsere 
Abonnenten 

Vermerken Sie 
bei Schriftverkehr 
und Zahlungen 
neben der 

vollständigen Anschrift 
stets Ihre Abo- 
Nummer. 

Sie vermeiden 
damit unnötige 
Verzögerungen 
bei der 
Bearbeitung 
Ihres 

Abonnements. 
Vielen Dank. 

Ihre 

DMV-Versandabteilung 


Anzeigenschluß 
für die 

Ausgabe 4/87 
von 

PC Schneider 
International 
ist der 

18.2.87 

Erscheinungstermin 
ist der 

25.3.87 
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Anschrift Vcrlag/Redaktion: 

DMV Daten & Medien Verlagsgcs mbH 

Postfach 250. Fuldacr Straße 6 

3440 Eschwege 

Telefon: (0 56 51) 87 02 

Telex 993 210 dmv d 

Vertrieb 

Verlagsunion 

Friedrich Bergius-Straße 20 
6200 Wiesbaden 

Druck 

Druckerei Jungfer, 3420 Herzberg 
Bezugspreise 

»PC Schneider International« erscheint monatlich am 
Ende des Vormonats. 

Einzelpreis DM 6,—/sfr 6.—/OS 50,— 

Abonnementpreise 

Die Preise verstehen sich grundsätzlich einschließlich 
Porto und Verpackung 

Inland: 

Jahresbezugspreis: DM 60, 

Hai bjah resbezugspreis: DM 30.- 
Europaisches Ausland: 

Jahresbezugspreis: DM 90.- 
Halbjahresbezugspreis: DM 45, 

Außereuropäisches Ausland: 

Jahresbezugspreis: DM 120,— 

Halbjahrcsbczugspreis: DM 60,— 

Bankverbindungen: 

Postscheck Frankfurt/M: Kto-Nr : 23043-608 
Raiffeisenbank Eschwege: 

BLZ: 522 603 85, Kto.-Nr.: 245 7008 
Die Abonnementbestellung kann innerhalb einer Woche 
nach Auftrag beim Verlag schriftlich widerrufen werden 
Zur Wahrung der Frist reicht der Poststempel Das Ab¬ 
onnement verlängert sich automatisch um 6 bzw 12 Mo¬ 
nate. wenn es nicht mindestens 6 Wochen vor Ablauf 
beim Verlag schriftlich gekündigt wird 
Für unverlangt eingesandte Manuskripte und Datenträ¬ 
ger sowie Fotos übernimmt der Verlag keine Haftung 
Die Zustimmung zum Abdruck wird vorausgesetzt 
Das Urheberrecht für veröffentlichte Manuskripte lieg! 
ausschließlich beim Verlag Nachdruck sowie Vervielfäl 
tigung oder sonstige Verwertung von Texten, nur mit 
schriftlicher Genehmigung des Verlages 
Namentlich gekennzeichnete Fremdbeiträge geben nicht 
in jedem Fäll die Meinung der Redaktion wieder 

Mitglied der Informationsgemeinschaft 
zur Feststellung der Verbreitung von 
Werbeträgern c V (1VW), Bad Godesberg 


Einen Teil unserer Auflage ist eine Beilage 
des WEKA-Verlages beigefiigt 
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— Das ist die Software zum PC Magazin — 
— Jeden Monat neu — 
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Speich« rautruStung 

itest Vcrtax-FestpOCte 


Kassette 14,— DM zuzüglich Porto/Verpackung (im 
Ausland zuzüglich 5,— DM Porto/Verpackung). 


Als Diskette für 1/2 Jahr (6 Lieferungen): 


Im Inland und West-Berlin.150,— 

Im europäischen Ausland.160,— 

Im außereuropäischen Ausland.180— 


DM 

DM 

DM 


DATABOX: 

— mehr als der übliche Soft¬ 
wareservice 

— bringt ergänzend sämtli 
che Ustings der jeweiligen 
Zeitschrift und alle Pro- 
grammbeispiele auf Kas¬ 
sette oder auf 3”Diskette. 

— Programme sind, soweit 
systembedingt möglich, 
auf allen drei CPC- 
Modellen lauffähig Einzel¬ 
heiten entnehmen Sie bit¬ 
te der nebenstehenden 
Aufstellung 

— erscheint jeden Monat 
und trägt das Titelbild des 
gleichzeitig erscheinen¬ 
den Heftes 

— der Datenträger zum PC 
Schneider International 
enthält außerdem jedes¬ 
mal ein zusätzliches Bo¬ 
nusprogramm, das nicht 
im Heft abgedruckt ist. 

>Einzelbezug: 

" Einzelbezugspreise für DATABOX: 

Diskette 3” 24,— DM zuzüglich 3,— DM Porto/Ver¬ 
packung (im Ausland zuzüglich 5 — DM Porto/Ver¬ 
packung). 


Für alle CPC's als Kassette und 
3" Diskette. 

Auch als Abonnement mit Preis¬ 
vorteil erhältlich. 

Inhalt der Databox zu Heft 2/87: 

Programm 464 664 6128 

Snake • 

Bestellung • 

Mathe Generator [CALI • 

CAD Kurs 2 • 

Kurs Datas • 

Q-Text [Profimat] 


Software 
Software 
Software Ex' 
Software Ex 
Toolhex 
Split Demo 
Split 464 Datas 
Split 664/6128 
Midi Recorder 
Midi Datas 
Bonusprogramm 


Q-Code [Devpac] 
re Expenment 1 
re Expenment 2 


Das Databox-Abo kostet: 

Als Kassette für 1/2 Jahr (6 Lieferungen): 

Im Inland und West-Berlin.90— DM 

Im europäischen Ausland.100,—DM 

Im außereuropäischen Ausland.120,— DM 


Zahlungsweise: 

Am einfachsten per Vorkasse (Verrechnungs¬ 
scheck) oder als Nachnahme zuzüglich der Nach¬ 
nahmegebühr (in das Ausland ist Nachnahme 
nicht möglich). 


Preisvorteil durch Databox-Abo: 

Unser beliebter Databox-Service kann ab sofort 
auch im Abonnement bezogen werden. Dadurch 
sparen Sie Mühe und haben außerdem noch ei¬ 
nen Preisvorteil gegenüber dem Einzelbezug. 


Als Kassette für 1 Jahr (12 Lieferungen): 


Im Inland und West-Berlin.180,— DM 

Im europäischen Ausland.200,— DM 

Im außereuropäischen Ausland.240,— DM 

Als Diskette für 1 Jahr (12 Lieferungen): 

Im Inland und Westberlin.300,— DM 

Im europäischen Ausland.320— DM 

Im außereuropäischen Ausland.360— DM 


In den vorgenannten Preisen sind die Versand- 
und Verpackungskosten enthalten. Bitte benutzen 
Sie für Ihre Bestellung die Abo-Karte. 


PC Schneider international 

Postfach 250, 3440 Eschwege 


Bitte Bestell karte benutzen 
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»PC Schneider international« 
erhalten Sie ab 25. Februar 
bei Ihrem Zeitschriftenhändler 



Zwei Jahre gibt es nun die Schneider International. 
Ein kleiner Rundblick erwartet Sie im nächsten Heft. 



Wir wollen Ihnen einmal demonstrieren, welche Fä¬ 
higkeiten CP/M plus bei entsprechender Anwendung 
entwickeln kann. 



Berichte 


Leser wählten die Software des Jahres 
1986! 

Wer machte das Rennen? In der Redaktion 
herrschte enorme Spannung, als die zahl¬ 
reichen Zuschriften (vielen Dank an alle, 
die mitgemacht haben) unserer Leser aus¬ 
gewertet wurden. 

Gesucht wurden die jeweils drei besten 
Programme aus den Genres Anwendungen 
und Spiele für CPC, Joyce-Besitzer sollten 
das beste Anwendungsprogramm wählen. 
Des Rätsels Lösung exklusiv im nächsten 
Heft! 

Zwei Jahre Schneider-International! Feiern 
Sie mit, gewinnen Sie mit! Unsere große 
Überraschungstombola beinhaltet viele tol¬ 
le Preise. Zwei Jahre ist es nun her, als die 
Schneider CPC International erstmals in 
den Verkaufsregalen zu finden war. Unser 
kleiner Rückblick soll Ihnen einmal einen 
Einblick in die Entwicklung Ihrer Zeit¬ 
schrift sowie der täglichen Redaktionsar¬ 
beit geben. 


Serien: 


Spieleprogrammierung in Assembler 
— der zweite Teil unserer Serie beschäf¬ 
tigt sich mit dem Spielfeld. Unsere 
Spielfigur Karlchen zeigt Ihnen dies¬ 
mal, wie Aufbau und Kontrolle eines 
Spielfeldes in Assembler vonstatten 
gehen. 

Da gibt es allerhand zu bedenken - 
überzeugen Sie sich selbst. Übrigens 
werden wir in Kürze einen Assembler 
zur Verfügung stellen, so daß alle 
CPC-Besitzer ohne Einschränkungen 
an dieser Serie und den damit verbun¬ 
denen Erfolgserlebnissen teilhaben 
können. 


Software Reviews: 


Break Thru 

Superman - the Game 

Jountlet 

Scooby Doo 


Joyce: 

Mit dem in diesem Heft abgedruckten 
Joyce-Assembler wird als erstes Experi¬ 
ment eine Software-Uhr erstellt. 

Versalien auf dem Joyce-Drucker: Der Bei¬ 
trag »Kalligraphie« zeigt, wie mit etwas 
Geschick herrliche kleine Grafiken in Far¬ 
be aufs Papier gebracht werden können. 
Ein Taschenrechner als Unterprogramm in 
bestehende BASIC-Programme einbind- 
bar, rundet die Joyce-Rubrik im nächsten 
Heft ab. 


Professional Computing: 


Wie schnell ist der Schneider PC? 

Um die Rechnergeschwindigkeit zu bewer¬ 
ten, bedient man sich sogenannter Bench¬ 
marktests. Wir haben einige für Sie zusam¬ 
mengestellt, die sehr eindrucksvoll die Ge¬ 
schwindigkeit des PC 1512 demonstrieren. 

Von CPC zu PC 

Unsere Erfahrungen zeigen, daß immer 
mehr Anwender von Geräten der CPC- 
Serie auf den PC. 1512 umsteigen. Dazu ha¬ 
ben wir einen aktuellen Bericht vorberei¬ 
tet, u.a. erfahren Sie, wie Dateien vom 
CPC auf den PC übertragen werden 
können. 


CP/M: 


Interessantes zu CP/M plus — unter dieser 
Überschrift erwartet alle CPC 6128- und 
Joyce-Besitzer der Auftaktartikel über un¬ 
bekannte Größen des Betriebssystems. 

Der erste Teil wird sich ausführlich mit 
dem Kommando »Help« beschäftigen. Sie 
werden staunen, was Sie damit alles ma¬ 
chen können! 


Tips & Tricks: 


Liebe CPC-Besitzer - blicken Sie auch 
manchmal ein bißchen wehmütig auf die 
tollen Computer mit sogenannter Mouse- 
Steuerung? Brauchen Sie nicht länger - 
denn Mouse Basic erwartet Sie nächsten 
Monat! 

Das sollten Sie auf keinen Fall versäumen! 

Label BASIC 

- zeigt Ihnen auf eindrucksvolle Art und 
Weise, wie beliebiges und müheloses »Lin¬ 
ken« von Programmteilen realisiert wird. 
Mit der sogenannten »symbolischen Adres¬ 
sierung in BASIC« wird eine Program¬ 
miertechnik vorgestellt, die neben einer 
höheren Übersichtlichkeit der Programme 
auch deren - von Zeilennummern unab¬ 
hängige Abarbeitung ermöglicht. Das Zu¬ 
sammenfügen von Programmteilen ist 
dank Label-BASIC nun kein Problem 
mehr. 


Hardware: 


Er ist nun doch noch fertig geworden - der 
bereits für die Ausgabe 1/87 angekündigte 
A./D. Wandler hat’s dafür aber auch wirk¬ 
lich »in sich«. Dazu gibt es natürlich auch 
die passende Software - hier haben wir 
eine tolle Überraschung für Sie parart. 
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Die Zukunft hat begonnen! 





stir i l 1. Text- 

Verarbeitung 
^ 2. Adress- 

Verwaltung 

3. Graphik- 
Programm 

4. DFÜ- 
Prograi 


Dieses 
einzigartige 
Textsystem 
verfugt über 
4 verschiedene 
Arten der Be¬ 
nutzerführung. 

Der Anwender 
lernt und 
wächst mit 
dem System. 

Ob Sie lieber mit der Maus, dem Pull-Down- 
Menue, Funktionstasten oder mit Controll- 
Codes arbeiten, dieses Textsystem paßt sich 
Ihren Fähigkeiten Schritt für Schritt an. 
Antanger oder Profi, STAR-WRITER PC 
hält allen Ansprüchen stand. 

• Gleichzeitiges Bearbeiten von bis zu 7 Do¬ 
kumenten. 

• Graphiken können in den Text eingebun¬ 
den werden. 

• Formatierte Ausgabe auf dem Bildschirm 
(WYSWYG). 

• Floskeltasten und Macrofunktionen. 

• Erstellung von Rundschreiben. 

• Erstellung von selbstrechnenden Formu¬ 
laren. 

• Erstellung eines Stichwort- und Inhalts¬ 
verzeichnisses. 

• Ausführliches Handbuch und Übungsteil. 


STAR-WRITER PC 

Das Textsystem für den Schneider PC 
und alle IBM-Kompatiblen-Rechner! 


^T- A MUtv^P reVS 1 




UELZENER STR. 12 
2120 LÜNEBURG = \ 

FERNRUF (041 31) 402550 =_=: = j 
TELEX 2 182 221 stard ät == s 


COUPON \ 

Coupon bitte ausüiüen, ausschneidcn und an SIAR-DIVISTON schicken. 1 
Bitte schicken Sie mir 


□ 

□ 


kostenlos und unverbindlich 
Infoim f.tionen über 
STAR-WRITER PC 

Bitte schicken Sie mir 
STAR-WRJTIiR PC zum 
litnfiihrungspreis von 
DM 29S,-. 


Firma _ 
Strasse _ 
PLZ/Ort. 


Für Schneider PC und «Ile IBM-Kompatiblen-Rechner »b 256 KB mit Monochrom- oder Grifucartc, J 

Alle Preise sind unverbindliche Prcisempfehlungcn zr.gl. DM 10,- Er Porto und Verpackung ^ 































Scfweiflgebadet wache ich aus einem 
Alptraum auf. Doch der Alptraum 
setzt sich fort. Mein Raumschiff 
wurde aus seiner Bahn 
geworfen. Schlaftrunken 
stelle ich fest daß fmM 

ich mich nur 
noch durch 
eine Notlandung 
auf einen nahegelegenen - 
Dschungel-Planeten retten kann. 


Unter den 


auf dem riesigen Planeten verstreut. ■Meine einzige Chance, wieder nach Hause 


in scheinen etwas dagegen zu haben. 


'ÄH& für ZX Spectrum 48k / 128k.Ämodore. CPC Schneider ® 

‘ - • - 










